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PREFAZIONE 



Questo manuale descrive, in modo 
semplice, l'uso del linguaggio 
BASIC del Sistema M20 del- 
1 'OLIVETTI. La descrizione si av- 
vale di molte figure, tabelle ed 
esempi, inoltre le istruzioni e i 
comandi che vengono usati insieme 
o hanno una funzione simile, ven- 
gono illustrati nello stesso capi- 
tolo. 
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1. COSA È IL BASIC? 




SOMMARIO 



Questo capitolo illustra le principali caratteristiche del linguaggio 
BASIC del Modello 20 (M20). 

Dopo un breve cenno ai due ambienti operativi presenti su questo sistema, 
il PCOS \ Professional Computer Operating System) e il BASIC, si spiega 
come usare la tastiera, come eseguire calcoli immediati, come impostare 
ed eseguire un programma BASIC e quali sono le modalità operative in 
BASIC. 
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COSA E' IL BASIC? 



IL LINGUAGGIO BASIC 

IL BASIC (Beginner's All-purpose Symbolic Instruction Code) è un 
linguaggio di alto livello e di uso generale (general purpose). 

POSSIAMO USARE IL BASIC PER RISOLVERE SIA PROBLEMI COMMERCIALI CHE 
SCIENTIFICI. 

IL BASIC E' UN INSIEME DI ISTRUZIONI E COMANDI DI IMME01ATA INTERPRETA- 
ZIONE. RISULTA QUINDI FACILE IMPARARLO E USARLO. 

Diverse versioni del linguaggio BASIC sono disponibili su diversi 
sistemi. La prima versione del BASIC fu sviluppata al Dartmouth College 
da John G. Kemeny e Thomas E. Kurts. D'ora in poi, parlando di BASIC, 
faremo riferimento alla versione implementata sul Modello 20 (M20). 

IL BASIC M20 E' UNA VERSIONE DEL BASIC MICROSOFT ESTESA CON PRESTAZIONI 
GRAFICHE E LA GESTIONE DELL'INTERFACCIA STANDARD IEEE 488. 



AMBIENTI PCOS E BASIC 

Il sistema M20 può essere semplicemente definito come un computer e un 
insieme di programmi forniti dalla Olivetti e residenti su un floppy disk 
da 5*» in. (disco sistema). Questi programmi possono essere anche 
residenti su hard disk per i sistemi M20 con questa unità. 

Questi vengono detti "Programmi di Sistema". Questi Programmi di Sistema, 
che comprendono il PCOS e il BA51C, permettono di dare istruzioni al 
computer in un linguaggio simile alla lingua inglese. Essi convertono le 
istruzioni fornite dall'utente in un linguaggio macchina che può così 
essere interpretato dal computer. L'utente interagisce con il computer 
usando comandi PCOS e BASIC e insiemi di istruzioni che formano un 
programma BASIC. 

Nota : D'ora in avanti useremo: 

- il termine "dischetto" invece di floppy disk da 5H in. 

- il termine "disco" per specificare sia un dischetto sia l'hard disk. 
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PROGRAMMI DI SISTEMA 









Iniziai lOHfttM di un disco 






PCOS 




BASIC 






Introduzione di un programma 


Denominazione di un disco 


Lista di un programma 


Copia di un disco 


Memorizzazione tu disco 
di un programma 


Lisia della dircctoiy 


Esecuzione di un programma 








Assegnazione di una password 




Debugging di un programma 


Crearono di un ftlo 




Modifica di un programma 


Protezione di un Me da scrittura 


Calcoli immediati 




Disegno di figure 









Figura 1-1 Programmi di Sistema 



USO DELLA TASTIERA 

La tastiera permette di impostare qualsiasi tipo di testo e di introdurre 
i caratteri di controllo. 



Sezione Alfanumerica 
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Sezione Numerica 



Figura 1-2 La Tastiera (Versione USA-ASCII) 
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Nota : Tutti i caratteri indicati in questo manuale si riferiscono alla 
versione USA-ASCll della tastiera. L'Appendice B elenca le varie 
equivalenze nazionali per quei caratteri ASCII, che appaiono su video o 
su stampante. 

Quando, in questo manuale, si vuole mettere in evidenza quali sono i 
tasti che l'utente deve premere per realizzare una certa funzione, verrà 
riportata l'esatta sequenza dei tasti in negativo (caratteri bianchi su 
fondo nero). In detta sequenza possono figurare anche i tasti indicati in 
neg."-.ivo nella figura 1-2. Ad esempio: 



uno dei due tasti shift (solo la tastiera USA - ASCII e USA - ASCII con 
verbi BASIC hanno i due tasti Shift siglati, le altre tastiere hanno 
questi tasti privi di sigla). 

Volendo ricordare all'utente di premere HB P er inviare una linea al 
sistema, aggiungeremo il simbolo al termine della linea medesima. 

Per esempio: 



nuyuiiu 




DELETE 100 - 200 BEM 



COME INTRODURRE 1 CARATTERI 



SE l'utente... 



ALLORA... 



preme un tasto (o 
una combinazione 
di tasti) 



il carattere che rappresenta viene subito 
visualizzato su video. Di volta in volta che 
l'utente imposta dei caratteri, il cursore 
(■) lampeggia e indica la posizione che verrà 
occupata dal carattere successivo 



vuole introdurre un 
carattere minuscolo 
o il simbolo infe- 
riore (dei tasti 



deve semplicemente premere quel tasto, per 
esempio Q per a 



con due simboli) 
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vuole introdurre 
un carattere maiu- 
scolo o il simbo- 
lo superiore (dei 
tasti con due 
simboli ) 


deve premere contemporaneamente al tasto uno 


dei due tasti M-HHJ M per esempio BflilIaU MM 


per A. L'UTENTE PUÒ' ABILITARE 0 DISABILITARE 
IL FISSA MAIUSCOLE PER LE LETTERE (A-Z) 


PREMENDO ■«HiliMfliM HI (vedere Caratteri di 


Controllo) 


vuole introdurre 
un numero 


può usare la sezione numerica o la prima riga 
di tasti della sezione alfanumerica 


tiene premuto un 
tasto per un tempo 
superiore al tempo 
medio di una battu- 
ta (mezzo secondo) 


il carattere corrispondente viene introdotto 
più volte finché il tasto non viene rilasciato 


vuole trasmettere 
una linea al siste- 
ma (una linea BASIC, 
un comando PCOS, o 
più dati in risposta 
a una istruzione 
INPUT o LINE INPUT) 


deve chiudere il messaggio premendo MM. che 
posiziona il cursore all'inizio della linea 
successiva 


vuole spostare il 
cursore alla linea 
successiva (prima 
di raggiungere il 
margine del video) 


deve premere ripetutamente (o mantenere premu- 
to) BEB3I 


CARATTERI DI CONTROLLO 

1 caratteri di controllo 


vengono impostati premendo contemporaneamente 


BiHilM oppure MwmtMilil 


1 e un altro tasto. La seguente tabella riporta 



tutti i caratteri di controllo dell' M20 con relativi significati. 



SE l'utente imposta... 


ALLORA... 


malusi a 

(Break) 


interrompe l'esecuzione di un programma. L'M20 
ritorna al BASIC (Stato Comandi) e visualizza Ok 
(se in ambiente BASIC) o ritorna al PCOS (Stato 
Comandi) e visualizza > (se in ambiente PCOS). 
Vedere anche: "Come Correggere gli Errori di Ira- 
postazione" 



► 
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il cursore cambia forma e lampeggia e nessun 
carattere impostato in tastiera appare su video 
(Hide State) 

PER RITORNARE A VISUALIZZARE 1 CARATTERI 


L'UTENTE DEVE PREMERE NUOVAMENTE BUlH MM 


OPPIIRF MfM 


mm ci 

\ IdoLU Ul T 1 LUI 1 1 U / 


l'ultimo carattere introdotto viene cancellato 

p ìl nir^nrp ui pnp arrptrAtn r!i nnfl nfmÌ7tfinp 


(Tabulatore) 


il cursore si sposta a destra di otto posizioni 


làtiS fcìiiaji 

(Reset logico) 


la memoria viene azzerata e il PCOS viene di 
nuovo caricato in memoria da disco 


Q 


viene sospeso l'output su video. 

L'OUTPUT PUÒ' ESSERE RIPRESO IMPOSTANDO UN 




(Escape) 


si esce dallo Stato di Inserimento Caratteri, 
pur rimanendo nello Stato di Editor (v. Cap. 3) 




abilita il fissa maiuscole per lettere (A-Z). 
PER DISABILITARE IL FISSAMAIUSCOLE, L'UTENTE 


COMMAND I ?/ I 




DEVE PREMERE DI NUOVO K 






COME CORREGGERE GLI ERRORI DI IMPOSTAZIONE 

L'utente può correggere un errore di impostazione sia prima che dopo 
aver introdotto una linea. 


SE l'utente si 
accorge. . . 


ALLORA... 


OPPURE... 


di un errore prima di 
aver completato una 
linea (cioè prima di 
premere MAM' : 


può cancellare l'ulti- 
mo (o gli ultimi) ca- 
ratteri impostati pre- 
mendo una (o più volte) 
■*!:<■ MI! e reimposta- 
I re il (o i) caratteri 
errati 


può spostare il cursore 
alla linea successiva 
premendo MIM WM e 
impostarla di nuovo 
dall ' inizio 



► 
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di un errore dopo aver può sostituire la linea può entrare in Stato 



completato la linea 
(cioè dopo aver premu- 
to EAM 

E 5E 

si tratta di una linea 
di programma 



errata, introducendo 
una nuova linea con lo 
stesso numero di linea; 
LA NUOVA LINEA SOSTI- 
TUIRÀ' IN MEMORIA LA 
PRECEDENTE 



Editor e usare i coman- 
di dell'Editor per mo- 
dificare la linea (ve- 
dere Capitolo 3) 



CALCOLI IMMEDIATI CON L'H20 

L'utente può utilizzare il sistema M20 come una macchina calcolatrice sia 
quando vuole sapere subito il risultato di una espressione, che quando 
vuole verificare se un dato programma funziona correttamente o meno. 

Siamo in BASIC. Il messaggio Ok appare sul video. 

L'utente può impostare MJM U 11 El fM (oppure più semplicemente il 
solo tasto WtM t poi una espressione e BO- 

L'espressione viene valutata e il suo valore viene visualizzato. 
L'utente può anche introdurre W (|S Di. poi il nome di una variabile 
(cioè una stringa di caratteri il cui primo carattere è una lettera), 
l'operatore di assegnazione (=), un'espressione e Gfl. L'espressione 
viene valutata e il suo valore viene memorizzato nella variabile; questa 
può essere utilizzata in calcoli successivi per rappresentare quel 
determinato valore. 

La seguente tabella riporta alcuni esempi di calcoli immediati. 



VIDEO 



COMMENTI 



PR1NT 3 
3 
Ok 



la costante 3 viene visualizzata (possiamo clas- 
sificare una costante come il caso più semplice 
di espressione) 



PR1NT 2+3 
5 
Ok 



L'espressione 2+3 viene valutata e il suo valore 
(5) viene visualizzato 
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LET A = 15.21 
Ok 


la costante 15.21 viene assegnata alla variabile 
A. L'utente può utilizzare la variabile A in 
rrilrnli surrp^^ivi Der raDDresentare detto vaio— 
re. 


? A-1 
14.21 
ni 


l'espressione A-1 viene valutata e il suo valore 
(14.21) viene visualizzato. 

Nntfl* F ' nn^^ihìlp lninn^tarp''' ì nvprp ri ì PR1 NT 


; : ,3 

UK 


la costante 2.3 viene assegnata alla variabile 

D la namla rKi ano IPT mio pccom nmacca 1 ' 1 1_ 
□ . La parola L.N 1 d ve ll i puu esbBi c u ite b bd , 1 u— 

tente può iniziare la linea con il nome di una 
variabi le 


? A*B 

34.983 

Ok 


l'espressione A*B viene valutata. 11 simbolo * 
significa moltiplicato. 11 valore 34.983 viene 
visualizzato. 


? A»B-40 

-5.017 

Ok 


l'espressione A*B-40 viene valutata e il suo 
valore (-5.017) viene visualizzato. Si noti che 
se il valore di una espressione è negativo il 
segno meno (-) viene sempre visualizzato, mentre 
se il suo valore è positivo il segno più (+) 
viene sostituito da uno spazio 



UH SEMPLICE PROGRAMMA 

Si può utilizzare il sistema M20 anche per memorizzare ed eseguire un 
programma BASIC. 

Eseguendo un programma, l'utente può risolvere problemi che non è 
possibile risolvere utilizzando il sistema M20 come una qualsiasi 
macchina calcolatrice. 

Un programma BASIC consiste di un insieme di istruzioni. 

Un'istruzione è un'entità elementare di programma che dice al BASIC di 
svolgere una ben determinata operazione. 

E' possibile impostare linee con una o più istruzioni. In questo ultimo 
caso le istruzioni vengono separate l'una dall'altra dal segno di 
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punteggiatura due punti (:). 



In un programma BASIC ogni linea inizia con un numero intero compreso tra 
0 e 65529 (estremi inclusi) e finisce quando l'utente preme il tasto M:M 

Siamo in BASIC. Sul video appare il messaggio OK. L'utente può iniziare a 
introdurre in memoria da tastiera delle istruzioni. Ad esempio le 
seguenti : 



10 REM RETTANGOLA EU 
20 INPUT "Base"; B ESM 
30 1F B< =0 THEN 20 BM 
40 INPUT "Altezza"; H §£M 
50 1F H<=0 THEN 40 MÌM 
60 LET AREA = B*H I£I 

70 PR1NT "Area="; AREA;" B=";B;" H=";H K4M 
80 GOTO 20 PEI 
90 END Bl 



Queste istruzioni formano un programma completo. Questo programma permet- 
te di risolvere un problema molto semplice; il problema consiste nel 
trovare l'area di un rettangolo introducendo da tastiera i valori della 
base e dell'altezza. 

Questo esempio è stato scelto sia per la sua semplicità sia per illustra- 
re un certo numero di prestazioni del linguaggio BASIC. 

Non si esclude che si possano realizzare programmi più efficienti per 
risolvere lo stesso problema (vedere Capitolo 3). 

Nel programma appena esaminato abbiamo impostato un'istruzione per ogni 
linea, ma avremmo anche potuto impostarne più di una, (utilizzando il 
separatore due punti (:)), riducendo così il numero di linee. Ad esempio: 



10 REM RETTAN&0L01 MÌM 
20 INPUT "Base";B:lF B- =0 THEN 20 Iti 
30 INPUT "Altezza";H:lF H ■ =0 THEN 30 I£l 
40 LET AREA=B*H WÌM 

50 PRINT "Area=";AREA;" B=";B;" H=";H EAM 
60 GOTO 20: END KdM 
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L'utente può introdurre fino a 255 caratteri per ogni linea (logica), 
compreso il numero di linea. Una linea logica può comprendere più linee 
fisiche. Per esempio: 

20 INPUT "Base" ;B : IF B<=0 

THEN 20 m 

è una linea logica comprendente due linee fisiche. Per cambiare linea 
prima di raggiungere il margine del video, l'utente deve premere una o 
più volte HBBI< 

PAROLE CHIAVE (KEYUORDS) 

Ogni istruzione incomincia con una parola chiave, che è una parola 
riservata. Una parola chiave è una parola mnemonica della lingua inglese. 
Dal punto di vista sintattico, deve essere preceduta e seguita da almeno 
uno spazio. 

Nota : Una parola chiave non può essere usata come nome di una variabile. 

La parola chiave indica il tipo d'istruzione da eseguire. Dopo la parola 
chiave l'utente può introdurre uno o più operandi (costanti o variabili) 

0 espressioni. Alcune istruzioni hanno più di una parola chiave ad 
esempio 1F... THEN. Le istruzioni del nostro programma contengono le 
parole chiave REM, INPUT, 1F... THEN, LET, PRINT, GOTO e END. L'utente 
può introdurre le parole chiave sia in lettere maiuscole che in lettere 
minuscole. In quest'ultimo caso vengono convertite in lettere maiuscole 
quando si lista il programma (vedere Capitolo 2). 

In BASIC sono parole riservate sia le parole chiave sia i nomi dei co- 
mandi (per esempio RUN, LIST, ecc..) e i nomi di funzione (per esempio 
SIN, COS, ecc...). Vedere Appendici C,D e E per una lista completa. 

COSTANTI 

1 numeri scritti in un programma BASIC (quali ad esempio 0, 150,-31.7) 
vengono denominati "costanti numeriche" e le stringhe di caratteri (quali 
"Base", "Altezza", "Area=", " B=" e " H=") vengono denominate "costanti 
stringa". Questo significa che i loro valori rimangono gli stessi durante 
tutto il programma. Per esempio, quando la costante 150 appare in un pro- 
gramma, questo valore resta immutato per tutta la durata del programma. 

Le costanti numeriche possono essere numeri interi (ad es; 150) o meno 
(numeri "reali"), ad es. -31.7. 
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Le costanti stringa sono sempre comprese fra virgolette, a meno che non 
venga specificato altrimenti. Stringhe non comprese tra virgfllette sono 
ammesse ad esempio all'interno di istruzioni DATA o in risposta a una 
istruzione INPUT o LINE INPUT. 
Per ulteriori dettagli vedere Capitolo 4. 

VARIABILI 

In un programma se un dato viene rappresentato da un nome, il suo valore 
può variare durante l'esecuzione. Si parla in questo caso di una 
"variabile" anziché di una "costante". Il nome di una variabile non può 
essere più lungo di 40 caratteri. 11 primo carattere deve essere una 
lettera. Esempi di variabili nel nostro programma sono: 
B , H , AREA 

Come abbiamo visto per le parole chiave, i nomi delle variabili possono 
essere introdotti sia in lettere maiuscole che minuscole. In quest'ultimo 
caso vengono convertite in lettere maiuscole quando si lista il 
programma. 

Una variabile può essere una "variabile semplice" (ad es. le predette 
variabili L, U, AREA) oppure una "variabile con indice". 

Una varibile con indice è un elemento di matrice ("array"), cioè un 
elemento di una collezione di variabili che hanno tutte lo stesso nome. 1 
vari elementi della matrice si distinguono tramite uno (o più) indici 
scritti tra parentesi tonde subito dopo il nome comune. Per esempio, se A 
è il nome di una matrice a una dimensione, A (0) è il suo p_rimo elemento, 
A(l ) il secondo ecc. . 

Una matrice può avere un numerò qualsiasi di dimensioni. Una matrice a 
una dimensione può essere considerata come una lista di dati. Una matrice 
a due dimensioni può essere considerata una tabella di dati. In questo 
caso il primo indice individua la riga della tabella e il secondo la 
colonna. Per esempio B(1,2) rappresenta il valore appartenente alla 
seconda riga e alla terza colonna. 
Per ulteriori informazioni vedasi il Capitolo 4. 

FUNZIONI 

Possiamo classificare le funzioni come funzioni di sistema ("built-in 
functions") o definite dall'utente ("user-def ined functions"). 
Parleremo brevemente qui di funzioni di sistema, mentre le funzioni 
definite dall'utente verranno illustrate nel seguito (vedasi Capitolo 9 
dove si possono anche trovare ulteriori dettagli sulle funzioni di 
sistema) . 
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Le funzioni di sistema consentono di eseguire molte tra le più comuni 
funzioni matematiche, quali la radice quadrata, il seno o il logaritmo o 
funzioni per l'elaborazione delle stringhe (quali l'estrazione di una 
sottostringa). E' sufficiente scrivere il nome di una di queste funzioni 
in un'istruzione, perché la funzione venga eseguita. Al nome della fun- 
zione può seguire, in parentesi tonde, il valore di uno o più argomenti 
(per esempio SIN ( 1.5)). 

Una funzione può essere un operando nell'ambito di una espressione (ad 
es. 1+2*C0S(.4)) e gli argomenti possono anche essere delle espressioni 
(ad es. L0GU5/7)) . 

Per esempio: 

S1N(1,5) è .997495 (SIN calcola il seno dell'argomen- 

to) 

1+2*C05(.4) è 2.84212 (COS calcola il coseno dell'argomen- 

to) 

L0&(45/7) è 1.86075 (LOG calcola il logaritmo naturale 

dell 1 argomento) 

SQR(10) è 3.16228 (SOR calcola la radice quadrata 

dell 'argomento) 

ESPRESSIONI 

Possiamo classificare le espressioni in 4 categorie: 

- espressioni numeriche 

- espressioni stringa 

- espressioni di confronto 

- espressioni logiche 

Parleremo brevemente qui dei primi tre tipi di espressioni, mentre le 
espressioni logiche verranno definite più avanti (vedi Capitolo 6, dove 
descriveremo anche gli altri tipi di espressioni più in dettaglio). 

Espressioni numeriche 

Un'espressione numerica può essere una costante numerica, una variabile 
numerica semplice, una variabile numerica con indice, una funzione 
numerica o una successione di questi elementi legati tramite simboli 
speciali, detti "operatori numerici". 
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Gli operatori numerici sono: 



+ addizione (es. A+B+C) 

Sottrazione (ES. A-B) 

\ divisione tra interi (gli operandi vengono arrotondati all'intero più 
vicino prima che la divisione venga eseguita e il quoziente viene 
troncato a valore intero, per es. 25.68 \ 6.99 è 3) 

MOD divisione modulo (fornisce quel numero intero che è il resto di una 
divisione tra interi, per es. 25.68 MOD 6.99 è 5, dato che 26/7 è 3 
con resto 5) 

* moltiplicazione (es. A*B) 

/ divisione (es. A/B) 

cambiamento di segno (es. -A è 35, se A vale - 35) 

a elevamento a potenza (es. A A B) 



Espressioni stringa 

Un'espressione stringa può essere una costante stringa, una variabile 
semplice stringa, un variabile stringa con indice, una funzione stringa o 
una successione di questi elementi concatenati mediante il segno di 
addizione (+). 

Utilizzando questo segno le stringhe possono essere "concatenate", cioè 
al primo valore stringa viene aggiunto in coda il secondo e così via fino 
a ottenere un'unica stringa risultante. 

Per esempio: 

19 A$ = "Chicago," 

20 BS = "IL.," 

30 CS = A$fBS+"USA" 

La concatenazione nell'istruzione 30 farà sì che venga assegnato alla 
variabile stringa CS il valore: 

Chicago, IL. .USA 
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Epressioni di confronto 

Dette espressioni confrontano due espressioni numeriche oppure due e- 
pressioni stringa per mezzo di un operatore di confronto. 

Gli operatori di confronto sono: 

= uguale a 

> maggiore di 

< minore di 

>= o => maggiore di o uguale a 

<= o =< minore di o uguale a 

<>o >< diverso da 

11 risultato di un'espressione di confronto può essere vero o falso e può 
essere usato per decidere dove passare il controllo dell'esecuzione di un 
programma . 

Per esempio è stata usata un'espressione di confronto nell'istruzione: 

30 1F L<=0 THEN 20 

Questa istruzione fa ritornare il controllo all'istruzione 20 se il va- 
lore della variabile L è negativo o uguale a zero. 



USO DEGLI SPAZI 

L'utente, per rendere il suo programma più leggibile, può introdurre 
degli spazi in qualsiasi posizione. Infatti non ci sono limitazioni 
nell'uso degli spazi, ad eccezione delle seguenti: 

- almeno uno spazio deve precedere e seguire una parola chiave, 

- gli spazi sono significativi solo all'interno delle costanti stringa, 

- gli spazi non sono ammessi all'interno delle costanti numeriche (inclu- 
si i numeri di linea), le parole chiave, i nomi delle variabili e i 
nomi delle funzioni. 

Per esempio: 

20 INPUT "Base";B 
e 

20 INPUT "Base"; B 
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sono istruzioni equivalenti, ma 



20 INPUT "8 a s e";B 

è una istruzione diversa, dato che contiene una stringa di caratteri più 
lunga. 

COMMENTI 

L'utente può documentare il proprio programma tramite l'istruzione REM 
(Remark). Dopo la parola chiave REM è possibile scrivere una qualsiasi 
stringa di caratteri stampabili ASCII. Per esempio: 

10 REM RETTANGOLO! Bl 

E' anche possibile inserire commenti in un programma introducendo una 
stringa di caratteri stampabili ASCII preceduta da un apostrofo (') e 
chiusa da tjM 

Questa stringa è detta "campo commento". 
Per esempio: 

80 GOTO 100 'Cicla indefinitamente IÈ1 

Sia le istruzioni REM, sia i campi commento possono essere inseriti in un 
punto qualsiasi di un programma. Dal punto di vista dell'esecuzione due 
programmi uno con, l'altro senza commenti sono assolutamente equivalenti, 
ma i commenti figurano nel listing (lista) del programma e consentono di 
avere un programma di facile comprensione in quanto "autodocumentato". 
Per ulteriori dettagli vedere Capitolo 2. 

ESECUZIONE DEL PROGRAMMA 

Proviamo a eseguire il programma che calcola l'area di un rettangolo. Se 
le linee del programma sono state impostate in tastiera una dopo l'altra 
(e l'M20 non è stato spento nel frattempo) il programma è in memoria. 
Impostiamo: M 11 W 11 il listing del programma apparirà su 

video. Alla fine del listing appare Ok. 
Impostiamo allora U Bl CI Iti 
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VIDEO 



LIST 

10 REM RETTANGOLO! 
20 INPUT "Base";B 
30 1F B' = 0 THEN 20 
40 INPUT "Altezza";H 
50 1F H- =0 THEN 40 
60 LET AREA=B*H 

70 PR1NT "Area=";AREA;" B= M ;B;" H=";H 

80 GOTO 20 

90 END 

Ok 

RUN 

Base? 3.5 
Altezza? 4.2 

Area= 14.7 B= 3.5 H= 4.2 

Base? -7.3 

Base? 7.3 

Altezza? 1.30 

?Redo fron start 

Altezza? 1 .32 

Area= 9.636 B= 7.3 H= 1 .32 

Base?C 

Break in 20 

Ok 



COMMENTI 



l'M20 inizia a eseguire le istru- 
zioni in modo sequenziale a par- 
tire dall'istruzione 10 (che in 
questo caso non viene eseguita 
dato che è un commento). 

Quando il controllo raggiunge una 
istruzione INPUT (vedere le i- 
struzioni 20 e 40) l'esecuzione 
del programma viene sospesa e 
l'M20 emette un messaggio indi- 
cando all'utente che deve intro- 
durre un valore da tastiera. Ad 
esempio possiamo impostare 3.5 
per la base e 4.2 per l'altezza. 

L'istruzione 60 calcola il valore 
della variabile AREA. L'istruzio- 
ne 70 visualizza questo valore, 
come pure i valori delle variabi- 
li B e H. L'istruzione 80 riporta 
il controllo all'istruzione 20. 

Se l'utente introduce un valore 
negativo per B (ad es.-7.3), 
l'istruzione 20 viene eseguita di 
nuovo, dato che l'istruzione 30 
ritorna il controllo all'istru- 
zione 20 se il valore di B è 
negativo o zero. 

Se l'utente introduce un valore 
negativo di H, l'istruzione 40 
viene eseguita di nuovo, dato che 
l'istruzione 50 ritorna il con- 
trollo all'istruzione 40, se il 
valore di H è negativo o zero. 



Se l'utente introduce un valore 
stringa per 3 o H (ad es.1.30 
per H) l'M20 visualizza un mes- 
saggio d'errore: 

?Redo from start 
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e l'utente deve introdurre un 
nuovo valore. L'esecuzione di 
questo programma termina solo se 
l'utente preme Q£Qi DT tal 
caso l'M20 visualizza un mes- 
saggio di interruzione (Break) e 
passa in Stato Comandi. Per ri- 
prendere l'esecuzione l'utente 
deve impostare : 

B O O D Eli 



MODALITÀ' OPERATIVE 

11 BASIC ha tre modalità operative. 



MODALITÀ' OPERATIVE 



STATO 
COMANDI 



STATO 
ESECUZIONE 



STATO 
EDITOR 
DI LINEA 



per impostare 
lineo immediate 
e di programma 



per eseguire 
programmi 
e linee 
immediate 



per modificare 
linee di pro- 
gramma 



Figura 1-3 Modalità Operative 



STATO COMANDI 

Quando l'M20 entra in Stato Comandi, visualizza il messaggio: 
Ok 

In Stato Comandi, il BASIC non accetta ciò che l'utente imposta in 
tastiera finché l'utente non preme MÌjM ■ 
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Linee Programma e Linee Immediate 



L'M20 non prende in considerazione eventuali spazi iniziali su una line3 
BASIC, ma interpreta il primo carattere diverso da uno spazio. Se questo 
carattere non è una cifra, il BASIC considera la linea come una "linea 
immediata" (cioè ad esecuzione immediata). Se è una cifra, il BASIC 
considera la linea come una "linea di programma" (vedere più avanti). 



SE... 

l'utente imposta una 
linea di programma, 
cioè un numero di li- 
nea (tra 0 e 65529), 
seguito da uno o più 
comandi o istruzioni 
BASIC separati da due 
punti ( : ) e alla fine 
preme MSÌM 



ALLORA... 

la linea viene trasferita in memoria, quando 
l'utente preme La linea non viene 

eseguita finché l'utente non imposta 111 H Kl 
|. Per esempio: 



100 PRINT "11 LOG di 5 è";L0G(5) 

è una "linea di programma". Quando l'utente 
preme G3, il BASIC trasferisce in memoria la 
linea. Per eseguire la linea si deve impostare 
LI 19 O 141 



l'utente imposta una 
linea immediata, cioè 
uno o più comandi o 
istruzioni BASIC se- 
parati da due punti 
( : ) e alla fine 
preme WSìM 

1 'utente imposta una 
sequenza di linee di 
programma. 



la linea viene eseguita non appena l'utente 
preme B9- 

PRINT "11 LOG di 5 è";L0G(5) 

è una "linea immediata". Quando l'utente preme 
I£|, il BASIC la esegue. 

le linee vengono trasferite in memoria in modo 
da formare un programma BASIC. 

Queste linee vengono memorizzate secondo la 
sequenza dei numeri di linea, indipendentemente 
dall'ordine in cui sono state introdotte. 

11 programma non viene eseguito finché l'utente 
non impostò M'M WM M1M Hìl 



1-17 



Modi 



Lo Stato Comandi comprende i seguenti Modi: 

- Modo Immediato (o Diretto), quando l'utente imposta una linea ad 
esecuzione immediata 

- Modo Programma, quando l'utente imposta una linea di programma. 
STATO ESECUZIONE 

Si dice che il sistema M20 è in Stato Esecuzione, quando esegue sia 
istruzioni o comandi BASIC (Stato Esecuzione BASIC), sia comandi PCOS 
(Stato Esecuzione PCOS). 

Un programma BASIC viene eseguito secondo la sequenza ascendente dei 
numeri di linea, a meno che un'istruzione di controllo come GOTO, 
ON... GOTO, 1F...THEN...ELSE, 1F. . .GOTO — ELSE, FOR/NEXT, WH1LE/UEND 
specifichi altrimenti. 



STATO EDITOR DI LINEA 

Il sistema BASIC comprende un Editor per poter correggere le linee di 
programma. Questo è molto utile per poter modificare linee lunghe e 
complesse senza bisogno di riscriverle completamente. 



SE 1 'utente deside- 
ra modificare... 

la linea attuale 
(numero di linea 
U...1) 

una linea specifi- 
cata (numero di 
1 inea nn. . .n) 




UUIII1 

n ma 



uuuu *wm 
o d o i&i 



il BASIC visua- 
lizza 



11. ..1 



Nota : La linea attuale è l|ultima linea impostata, modificata o che ha 
dato luogo a un messaggio d'errore. 



Se l'M20 entra in Stato Editor, l'utente può incominciare a modificare la 
linea (cancellando, inserendo e rimpiazzando i caratteri) facendo uso dei 
comandi dello Stato Editor (vedere Capitolo 3). 
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COSA E' IL BASIC? 



In Stato Editor il BASIC prende in esame i caratteri introdotti da 
tastiera di volta in volta che vengono impostati, senza aspettare che 
l'utente prema B3I- 

Impostando tàM il BASIC esce dallo Stato Editor. 



Errori di Sintassi 

Se durante l'esecuzione di una linea di programma viene riscontrato un 
errore sintattico, il sistema M20 visualizza: 

Syntax error in nn...n 

Ok 

nn . . . n 

e automaticamente entra in Stato Editor. 

Qui nn...n sta a indicare il numero di linea dove è stato riscontrato 
1 'errore. 

Stati dell'Editor 

L'Editor include i seguenti Stati: 



- Stato Cancellazione 

- Stato Modifica 

- Stato Inserimento 



Per entrare e uscire da questi Stati l'utente deve usare i corrispondenti 
comandi dell'Editor (vedere Capitolo 3). 



IST RUZIONI E COMANDI BASIC 

Risulta a volte difficile distinguere un'istruzione BASIC da un comando 
BASIC, poiché entrambi possono essere usati in un programma o in una 
linea immediata, ma: 

- le istruzioni BASIC sono generalmente usate in linee di programma e 
vengono impostate in sequenza per formare un programma (eccezione fatta 
per PR1NT, LPR1NT, LET e SUAP che sono anche usate spesso in linee 
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immediate, quando viene usato l'M20 come una macchina calcolatrice sia 
per visualizzare subito il risultato di un calcolo, sia per verificare 
se un programma è corretto visualizzando il contenuto delle variabili 
di programma) 

- 1 comandi BASIC sono usati per la gestione dei files o per lanciare 
programmi di servizio (utilities) come per esempio quando si listano i 
programmi o si azzera la memoria. Essi sono generalmente usati in linee 
immediate eccezione fatta per K1LL, LOAD, RUN, SYSTEM, TROFF, TRON e 
W1DTH che sono usati con una certa frequenza anche in un programma. 

Nel seguito del manuale, quando verrà introdotta una istruzione o un 
comando o una funzione BASIC, scriveremo a fianco del suo nome: 

- (IMMEDIATO), se può essere usato solo in modo immediato 

- (PROGRAMMA), se può essere usato solo in un programma 

- (PROGRAMMA/IMMEDIATO), se può essere usato sia in un programma, sia in 
modo immediato. 



COME CAMBIARE MODALITÀ' 0 AMBIENTE 

E' possibile cambiare modalità operative (Stato Comandi, Esecuzione, 
Editor) o ambiente (PCOS o BASIC) se l'utente imposta un apposito comando 
o se si verificano determinate condizioni. 

La saguente tabella indica tutti i casi possibili. 



SE l'M20 è in... 
BASIC 

(Stato Esecuzione) 



E SE... 



l'utente imposta 

ma u 

mentre l'M20 sta ese- 
guendo un programma 
BASIC o una linea 
a esecuzione 
inmediata 



ALLORA... 

l'esecuzione viene in- 
terrotta e l'M20 entra 
nello Stato Comandi 
BASIC 
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COSA E' IL BASIC? 



BASIC 

(Stato Comandi) 



l'utente imposta: 
In: ^ tlitìJ 



viene riscontrato un 
errore sintattico 



l'esecuzione di un 
programma o di un 
comando BASIC viene 
portata a termine 

OPPURE 
viene riscontrato 
un errore (escluso 
un errore sintattico) 

OPPURE 
viene incontrata 
una istruzione 
STOP (o END) 

l'utente imposta una 
linea immediata 



1 'utente imposta 

DDUUIIO 

Nota : SYSTEM può anche 
essere usato in un 
programma BASIC. 



la memoria jiene az- 
zerata e il PCOS viene 
nuovamente caricato ir, 
memoria 



l'M20 entra in Stato 
Editor alla linea che 
ha causato 1 'errore 

I 

l'M20 entra in Stato 
Comandi BASIC 



l'M20 entra in Stato 
Esecuzione (sempre in 
ambiente BASIC), ese- 
gue la linea immediata 
e ritorna in Stato 
Comandi BASIC. 



TM20 entra in PCOS e 
viene azzerata sia la 
memoria a disposizione 
dell 'utente, sia la 
memoria dove è alloca- 
to il BASIC. 
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l'utente imposta 

B o u u nasa 



oppure: 

BOB! 
Hi Iti 

1 'utente preme: 



l'M20 entra in Stato 
Editor di Linea 



la memoria viene az- 
zerata e il PCOS viene 
nuovamente caricato in 
memoria 



Stato Editor 
di Line 



l'utente preme HM 



l'utente preme 
(Exit) 



l'utente preme H 
(Quit Editing) 



l'M20 entra in Stato 
Comandi BASIC. (L'ulti- 
ma linea modificata 
viene visualizzata). 
Le variabili di pro- 
gramma vengono azzera- 
te (cioè le variabili 
numeriche poste a zero 
e le variabili stringa 
poste uguali alla 
stringa nulla). 

l'M20 entra in Stato 
Comandi BASIC. (La 
parte restante del- 
l'ultima linea mo- 
dificata non viene 
visualizzata). Le va- 
riabili di programma 
vengono azzerate. 

l'M20 entra in Stato 
Comandi BASIC e can- 
cella tutte le even- 
tuali modifiche fatte 
sulla linea. 
Le variabili di pro- 
gramma mantengono il 
loro valore. 
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COSA E' IL BASIC? 



PCOS 



1 1 utente preme 

mm EMO! 



1 ' utente imposta 

linci 



1 'utente imposta 
qualsiasi altro 
comando PCOS 



l'utente imposta: 



1 'utente imposta un 
identificatore di 
file (corrispondente 
a un programma BASIC) 
che sia stato regi- 
strato con l'esten- 
sione BAS (per es. 
FILEA.BAS) 

OPPURE 
l'utente imposta il 
comando BASIC segui- 
to da un identifi- 
catore di file, 
corrispondente ad 
un programma BASIC 
(per es. BA FILEB) 



la memoria viene az- 
zerata e il PCOS viene 
nuovamente caricato in 
memoria 



il BASIC viene carica- 
to in memoria e l'M20 
entra in Stato Comandi 
BASIC 



l'M20 entra in Stato 
Esecuzione (sempre in 
ambiente PCOS). 



la memoria viene az- 
zerata e il PCOS viene 
nuovamente caricato in 
memoria 



L'M20 entra in BASIC 
(Stato Esecuzione) e 
viene eseguito il pro- 
gramma specificato 
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INTRODUZIONE, LISTING ED ESECUZIONE 
DI UN PROGRAMMA 



SOMMARIO 



Questo capitolo illustra la sintassi adottata nel manuale per descrivere 
la struttura di una istruzione o di un comando o di una funzione; viene 
quindi spiegato come documentare un programma, come introdurlo in 
memoria da tastiera, come listarlo, trasferirlo da memoria a disco e 
viceversa e come eseguirlo. 
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SINTASSI ADOTTATA 

La sintassi adottata per descrivere la struttura di un comando, di 
un'istruzione o di una funzione BASIC si basa sui diagrammi sintattici 
(syntax diagrams). 

Un diagramma sintattico è un grafo con una sola entrata ed una sola 
uscita. Ogni percorso attraverso il grafo rappresenta una possibile 
sequenza di simboli. 

La seguente tabella enumera le regole da seguire per disegnare un 
diagramma sintattico. 



REGOLA 



tutte le parole e tutti i 
simboli racchiusi in ova- 
li o in cerchi devono es- 
sere impostati esattamen- 
te come indicato nella 
sintassi; 

tutte le parole racchiuse 
in un rettangolo rappre- 
sentano nomi di parametri 
usati in istruzioni o co- 
mandi o funzioni; 



ESEMPIO 




il significato di ogni 
parametro viene descritto 
nel testo che segue alla 
sintassi (quando non è di 
immediata interpretazio- 
ne). 



una diramazione indica 
una scelta: l'utente deve 
scegliere uno dei percor- 
si. 

Per esempio, dopo RUN è 
possibile: 

- impostare un numero di 
linea 

OPPURE 
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- un identificatore di 
file 



una diramazione senza pa- 
rametri indica che l'al- 
ternativa è un "bypass" 
(vedere nell'esempio il 
percorso che supera 
l'opzione ,R) 



un ciclo di ritorno (loop) 
indica che un parametro 
può essere ripetuto. Per 
esempio, il parametro "va- 
riatile" può essere ripe- 
tuto n volte in un'istru- 
zione READ, e ogni "va- 
riabile" deve essere se- 
parata dalla successiva 
da una virgola 



questo manuale indica in 
lettere maiuscole le pa- 
role riservate del BASIC, 
anche se l'utente può 
impostarle in lettere mi- 
nuscole. Alcuni esempi di 
parole riservate sono in- 
dicati a lato (sono le 
parole chiave del nostro 
programma RETTANGOLO! ) 



anche i nomi dei comandi 
PCOS sono mnemonici. Per 
esempio: 

BASIC - va in BASIC 
VCOPY - copia un volume 
ecc . 

L'utente può introdurli 
in lettere minuscole o in 
maiuscole. Vengono normal- 
mente introdotti in lette- 
re minuscole e in forma 
abbreviata (solo le prime 
due lettere), come indica- 
to nel programma sintatti- 
co qui a lato 




REM 

INPUT 

1F...THEN 

LET 

PR1NT 

GOTO 

END 




ba 



file 

ideniifier 
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COME DOCUMENTARE UN PROGRAMMA 



Spesso l'utente desidera inserire commenti in un programma per renderlo 
più leggibile e di più immediata comprensione. Ciò può essere fatto in 
due nodi: 

- utilizzando istruzioni REM 

- utilizzando campi commenti. 



L'istruzione REM (Remark) è una delle possibilità offerte dal BASIC per 
documentare un programma. L'utente può inserire qualsiasi stringa di 
caratteri dopo REM. Un'altra possibilità offerta dal BASIC è quella di 
inserire un campo commento, cioè una stringa di caratteri preceduta da un 
apostrofo (') e chiusa da MSìM- 




REM/CAMPI COMMENTI (PROGRAMMA) 




Figura 2-1 Istruzione REM 




string of 
characters 



Figura 2-2 Campo Commento 
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Esempi 



SE l'utente imposta. . . 


ALLORA... 


10 REM RETTANGOLO! Bl 


una istruzione REM dà il titolo al 
vostro orooramma F ' huona norma di 
programmazione dare sempre un tito- 
lo a ogni programma 


100 REM SUBROUTINE! Mi! 


una istruzione REM segna l'inizio 
di una subroutine (vedere capitolo 
10). E' buona norma di programma- 
zione dare sempre un titolo a ogni 

c i ih r*rt 1 1 1 1 no 
jUU> UUllllC 


10 'RETTANGOLO! W:l 


un campo commento dà il titolo al 
vostro programma. 

Nota: In questo caso l'apostrofo ha 
la stessa funzione della parola 
REM, dato che il campo commento 
occupa un'intera linea 


150 LET A=(A1+A2)/2 'Media Bl 


un campo commento è inserito a fine 
istruzione 



Note 

Una istruzione REM non può essere 
stessa linea, ma può essere l'ultima 
più istruzioni. 

Un campo commento può: 

- occupare un'intera linea (in tale caso l'apostrofo ha la stessa 
funzione di una istruzione REM) 

- essere inserito a fine istruzione. 

Sia le istruzioni REM, sia i campi commento possono essere inseriti in 
qualsiasi punto del programma. Non sono istruzioni eseguibili, ma appaio- 
no nel listing. 



seguita da altre istruzioni su una 
istruzione di una linea che contiene 
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INTRODUZIONE DI UN PROGRAMMA DA TASTIERA 

Il messaggio OK é sul video. 11 BASIC é in attesa che l'utente introduca 
dei caratteri da tastiera. E' possibile iniziare subito introducendo 
la prima istruzione iniziando a impostare il numero di linea (ad esempio 
10). Però l'utente può anche richiedere che il sistema faccia la numera- 
zione automatica di linee. Questa richiesta viene fatta tramite il coman- 
do AUTO (descritto in seguito). 

Però se l'utente ha già introdotto un programma e vuole introdurne un 
altro, deve, per prima cosa, impostare il comando NEW, che azzera la 
memoria. 

Il programma può anche essere cancellato dalla memoria sia caricando 
un nuovo programma da disco, sia introducendo un comando SYSTEM (per 
tornare al PCOS), sia spegnendo la macchina. In questi casi, é opportuno 
che l'utente, in precedenza, registri il programma su disco (a meno 
che già non ne abbia una copia). 

Impostiamo il programma (RETTANGOLO!) in tastiera. Per prima cosa 
impostiamo: 

uiiu Kzaa i'M 

Poi introduciamo: 

10 REM RETTANG0L01 Bl 

20 INPUT "Base"; 8 I£| 

30 1F B<-0 THEN 20 Bil 

40 INPUT "Altezza";H BBI 

50 1FH<=0 THEN 40 WXM 

60 LET AREA = B*H VM 

70 PR 1NT "Area=" ; AREA ; "B=" ; B ; "H=" ; H HI 

80 GOTO 20 Bl 

90 END E3| 

Conviene usare un intervallo di 10 fra ogni numero di linea. Questo 
permette all'utente di modificare facilmente un programma inserendo 
istruzioni fra le linee già esistenti. 

Le linee di programma sono ordinate in memoria secondo la sequenza del 
numero di linea, non nell'ordine in cui sono state introdotte in tastie- 
ra . 
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Per esempio, se impostiamo prima l'istruzione 50, poi la 10 ecc.. fino a 
impostarle tutte ma in un ordine qualsiasi noi introduciamo in memoria 
il medesimo programma. 

L'utente può introdurre parole chiave e nomi di variabili sia con lettere 
maiuscole che con lettere minuscole. Queste ultime verranno convertite 
nelle corrispondenti maiuscole quando si richiede il listing del pro- 
gramma. 



AUTO (IMMEDIATO) 

Fa iniziare la numerazione automatica delle linee. 




Figura 2-3 Comando AUTO 
Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


VALORI DI DEFAULT 


line number 


è il primo rumerò 
di linea generato 


10 se viene omesso 
anche il parametro 
interval; in ogni 
altro caso 0. 




il primo numero 
di linea generato 
è il numero della 
linea attuale 


10 


interval 


è l'intervallo tra 
i numeri di linea 


10 
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Esempi 



1 

SE l'utente imposta... 


1 I 
ALLORA la numera- 
zione di linea inizia... 


E l'intervallo di 
1 inea e . . . 


AUTO KJI 


alla linea 10 (va- 
lore di default) 


10 (valore di de- 
fault) 


AUTO . ,30 Iti 


alla linea attua- 
le 


30 


AUTO 100 Kl 


alla linea 100 


10 (valore di de- 
fault ) 


AUTO 150, |<U 


alla linea 150 


1 ' ul timo inter vai lo 
specificato da un 
precedente comando 
AUTO oppure IH il 
valore di default) 
se non é stato impo- 
stato un comando 
AUTO in precedenza. 


AUTO 200,20 Iti 


alla linea 200 


20 


AUTO , 3 PEI 


alla linea 0 


3 


Un Asterisco dopo un Numero di Linea 


SE... 


ALLORA... 


AUTO genera un numero 
di linea già esistente 


un asterisco compare sul video dopo il numero 
di linea per avvertire l'utente che egli sta 
per sostituire una linea già esistente. Comun- 
que, premendo immediatamente dopo l'aste- 
risco, si lascia inalterata la linea esistente 
e si genera il prossimo numero di linea. 

Nota: Questo può succedere solo se si introduce 
AUTO quando un programma è già esistente in 
memoria . 
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Per Terminare la Numerazione Automatica 



SE l'utente imposta... 



ALLORA... 



1*1 IT U 



la numerazione automatica viene interrotta e 
l'M20 entra in Stato Comandi. 



Nota : Quando si imposta M<U la linea 

attuale viene cancellata 



NEW (PROGRAMMA/ IMMEDIATO) 



Cancella il programma residente in memoria e le variabili, permettendo 
all'utente di introdurre un nuovo programma. 

NEW setta a zero il bit di "trace" (tracciamento) allo stesso modo del 
comando TROFF (vedere capitolo 13) e chiude tutti i file dati (vedere 
capitolo 12). 




Figura 2-4 Comando NEW 



Esempi 




il programma residente in memoria viene 
cancellato, insieme alle sue variabili. 



ALLORA...- 




un nuovo programma da 



tastiera. 



20 INPUT "Base";B «il 
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Nota : Non è necessario impostare NEW prima 
di trasferire in memoria un programma da 
disco, tramite il comando LOAD o RUN (questi 
comandi azzerano la memoria automaticamen- 
te). 



COME LISTARE UN PROGRAMMA 

Quando un programma è in memoria, può essere listato. Per listare un 
programma, l'utente può introdurre il comando LIST (il "listing" 
comparirà sul video), oppure il comando LL1ST (il "listing" comparirà su 
stampante). L'utente non può listare un programma protetto (registrato 
con l'opzione P). 

Quando si lista un programma le parole riservate (parole chiave, nomi di 
variabile e nomi di funzione) che l'utente aveva impostato in lettere 
minuscole, vengono convertite in lettere maiuscole e il punto interroga- 
tivo (?) eventualmente usato al posto della parola chiave PR1NT viene 
convertito in PR1NT. Inoltre le linee vengono visualizzate per numero di 
linea crescente indipendentemente dall'ordine con cui sono state 
impostate. 

Per listare il programma RETTANG0L01 sul video, impostiamo HI HI HI U 
■£9- Sul video apparirà: 





LIST 




10 REM RETTANGOLA 




20 INPUT "Base";B 




30 1F L<»0 THEN 20 




40 INPUT "Altezza";H 




50 1F H- =0 THEN 40 




60 LET AREA=B*H 




70 HR1NT "Area=";AREA;" B=' 


;B;" H=";H 


80 GOTO 20 




90 END 




OK 
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Alla fine della lista l'M20 entra in Stato Comandi e visualizza OK. 



LIST/LL1ST (IMMEDIATI) 

LIST lista le linee di programma sul video, LL1ST lista le linee di 
programma su stampante. 




— ■ c^> 








—* 


line 






numbor 





Figura 2-5 Comando LIST 



[LLIST1 — 



A I numbet f number 



Figura 2-6 Comando LL1ST 
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Esempi 


SE l'utente imposta... 


ALLORA... 


LIST EiM 


1 l'intero programma viene listato 


LIST 150 UAM 


la linea 150 viene listata 


LIST . I£J 


la linea attuale viene listata 


LIST 2g0-W:J 


vengono listate la linea 200 e tutte le suc- 
cessive 


LIST -1000 


vengono listate tutte le linee dall'inizio 
alla linea 1000 


LIST 100-190 Kl 


vengono listate tutte le linee dalla linea 
100 alla 190 


LIST .-500 KM 


vengono listate tutte le linee dalla linea 
attuale alla 500 


Per Interrompere una Lista 


SE... 


ALLORA. . . 


l'utente imposta 


la lista del programma viene sospesa, senza 
che il sistema entri in Stato Comandi. 

L'utente può continuare la lista premendo 
un qualsiasi tasto 


1 'utente imposta: 

w*i:m mm 


l'M20 entra in Stato Comandi interrompendo 
definitivamente la lista 


1 ' intero programma è 
stato listato 


l'M20 entra in Stato Comandi 
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FILE PROGRAMMA E FILE DATI 



Un file è una sequenza di istruzioni (file programma) o di dati (file 
dati), sequenza che può essere memorizzata su disco. 

La seguente tabella sintetizza le caratteristiche principali di un file 
programma e di un file dati. 



TIPO DI FILE SIGNIFICATO 



file programma un file programma è una sequenza di linee di 

programma. Queste vengono memorizzate se- 
condo la successione crescente dei numeri di 
linea, indipendentemente dall'ordine in cui 





sono state impostate. Un file programma 
viene memorizzato in un formato binario 
"conpatto" e registrato su disco o in questo 
formato o in un formato "sorgente" ASCII (se 
l'utente usa l'opzione A per registrarlo). 1 
file in formato ASCII sono sequenze di 
caratteri ASCII e rappresentano effetti- 
vamente la sequenza di caratteri che appare 
su video quando l'utente lista il programma. 
Quando un programma viene trasferito da 
disco a memoria (tramite un comando LOAD o 
RUN), esso viene sempre convertito in 
formato "compatto". 


file dati 


un file dati è una sequenza di dati numerici 

e/o stringa registrata su disco. 

Un file dati viene creato tramite un 

programma BASIC. Per prima cosa, deve essere 

aperto tramite una istruzione OPEN che ne 

specifichi il nome, il metodo d'accesso e 

associ al file un numero da 1 a 15. 

Ogni successiva istruzione di Input/Output 

nel programma farà riferimento al file 

tramite questo numero. 

Quando il programma non deve più leggere o 
registrare dati sul file è buona norma di 
programmazione "chiuderlo" tramite una i- 
struzione CL05E. In ogni caso tutti i file 
dati vengono chiusi quando il programma 
termina con una istruzione END. 
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Nota : Chiudere un file dati significa 
impedirne l'accesso da programma. Il pro- 
gramma, per poter accedere di nuovo a quel 
file deve riaprirlo tramite un'altra istru- 
zione OPEN associandovi un nuovo (o lo 
stesso) metodo c' accesso e un nuovo (o lo 
stesso) numero di file. Soltanto il nome 
dovrà essere lo stesso. 



IDENT IFICATORI DI FILE E DI VOLUME 

Un disco può contenere uno o più file programmi e/o file dati. Un singolo 
file non può essere registrato parte su un disco e parte su un altro. 

L'insieme di file registrati su un unico disco è denominato "volume". 

Ogni file e ogni volume hanno un proprio identificatore. Non è possibile 
avere due file con lo stesso nome su uno stesso volume. Se si registra un 
file programma su un disco dove esiste già un file con lo stesso nome, il 
nuovo file sostituisce il precedente. 

Si può assegnare un identificatore ad un file sia tramite l'istruzione 
OPEN (file dati), sia tramite il comando SAVE (file programma) e sia 
tramite il comando FNEW del PCOS. 

Si può assegnare un identificatore a un volume o con il comando VFORMAT o 
con il comando VNEW o con il comando VRENAME del PCOS. 

11 sistema riconosce un identificatore di volume e può accedere a uno dei 
suoi file soltanto se il dischetto corrispondenti è stato inserito in una 
delle due unità disco. Questa limitazione non vale per l'hard disk, dato 
che questa unità è sempre in linea. 



rs 
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volume identifier 




Figura 2-7 Identificatore di File e di Volume 



Dove 



ELEMENTO 


DI SINTASSI 


SIGNIFICATO 


volume name 
(nome di volume) 


stringa di (al massimo 14) caratteri stampabili 
ASCII (alcuni caratteri non sono ammessi, 
vedere Caratteri Illegali in questo paragrafo). 






Per selezionare un volume in un comando PCOS o 
BASIC o in una istruzione OPEN, l'utente deve 
specificare un nome di volume oppure un numero 
di unità disco. 
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INTRODUZIONE, LISTING ED ESECUZIONE DI UN PROGRAMMA 



11 nome di volume (come pure il numero di unità 
disco) può essere seguito da una password di 
volume. Alla fine di un identificatore di 
volume, l'utente deve impostare il carattere 
due punti ( : ) . 



Per esempio: 



SAVE "VOLI :F1LE1" ■£! 



Qui VOLI è un nome di volume; FILE1 è un nome 
di file e l'intera stringa V0L1:F1LE1 è un 
identificatore di file. Tramite questo comando 
l'utente registra il file programma F1LE1 sul 
disco che ha nome VOLI. (Per ulteriori dettagli 
vedere il comando SAVE in questo capitolo). 

Nota : Quando l'utente specifica un identifica- 
tore di file o di volume in una istruzione o in 
un comando BASIC, deve racchiudere l'identifi- 
catore tra virgolette ("), oppure scrivere una 
variabile stringa, o una espressione stringa il 
•cui valore è l'identificatore. 



Quando specifica un identificatore di file o di 
volume in un comando PCOS, non deve racchiudere 
l'identificatore tra virgolette. 

Per esempio: 

vn V0L1 : IH 



Si noti inoltre che tutti i comandi e le 
istruzioni BASIC possono solo specificare un 
identificatore di volume come facente parte di 
un identificatore di file. Fa eccezione il solo 
comando F1LES, quando viene utilizzato per 
visualizzare l'elenco di tutti i file di un 
volume. 



Per esempio: 
FILES "V0L2:" I£l 
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drive number (numero 
unità disco) 



file password 

OPPURE 
volume password 



file name 
(nome di file) 



il drive number può essere 0 (che indica 
l'unità, alla destra), oppure 1 (che indica 
l'unità alla sinistra), oppure 10 (che indica 
l'hard disk). In un sistema hard disk il drive 
0 è a sinistra e il drive 1 non esiste. 

Per esempio: 

LOAO "1 :F1LE002" BM 

Qui 1: indica che il file F1LE002 risiede sul 
dischetto inserito nella unità 1. 11 comando 
trasferisce il programma da disco a memoria 
(per ulteriori dettagli vedere il comando LOAD 
in questo capitolo) 



stringa di (al massimo) 14 caratteri stampabili 
ASCII. Alcuni caratteri sono esclusi (vedere 
Caratteri Illegali in questo paragrafo). 



Una password permette di proteggere un volume o 
un file limitandone l'accesso a chi conosca la 
password. Una password può essere impostata 
dopo un nome di volume, o un numero di unità 
disco, o un nome di file e deve essere 
preceduta da una barra (/). 

Per esempio: 

RUN "0 : RETTANG0L01 /R1 " 

Con questo comando l'utente trasferisce da 
disco a memoria il programma RETTANG0L01 che ha 
la password R1 e ne lancia l'esecuzione 
RETTANC0L01 è registrato sul dischetto inserito 
nell'unità 0. (Per ulteriori dettagli vedere il 
comando RUN in questo capitolo) 

stringa di (al massimo) 14 caratteri stampabili 
ASCII. Alcuni caratteri sono esclusi (vedere 
Caratteri Illegali in questo paragrafo). 

Per selezionare un file in un comando PCOS o 
BASIC o in una istruzione OPEN l'utente deve 
specificare un nome di file. Esso può essere 
preceduto da un identificatore di volume e 
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INTRODUZIONE, LISTING ED ESECUZIONE DI UN PROGRAMMA 



seguito da una estensione (extension) e/o da 
una password. 

Per esempio: 

SAVE "1 :PR1MENUMBER5/PN" EU 

Tramite questo comando l'utente registra il 
file programma PR1MENUMBERS sul dischetto 
inserito nella unità 1 e dà al file la password 
PN. 



Nota : Se l'utente non specifica un identifica- 
tore di volume prima del nome di file, il 
sistema seleziona l'unità selezionata per 
ultima oppure l'unità 0 se nessuna unità era 
stata, in precedenza, selezionata per ultima. 

Nota : 11 nome di file può includere un'esten- 
sione, cioè una stringa di (al massimo) 12 
caratteri stampabili ASCII, preceduta da un 
punto decimale (.). Alcuni caratteri sono 
esclusi (vedere Caratteri Illegali in questo 
paragrafo) . 



Nota : filename. extension non può superare 14 
caratteri in totale (compreso il punto) 

Per esempio: 

LOAD "F1LEA.CHAR" t*'M 

trasferisce il programma F1LEA che ha l'esten- 
sione CHAR da disco in memoria. Esso risiede 
sull'ultima unità selezionata. 

Nota : Alcune estensioni hanno un significato 
particolare: BAS (programmi BASIC); CMD (Coman- 
di PCOS transienti); SAV (Comandi PCOS tran- 
sienti, che divengono residenti la prima volta 
che vengono eseguiti). Per ulteriori dettagli 
vedere il "Professional Computer Operating 
System (PCOS) Guida Utente". 
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Caratteri Illegali 



asterisco 


(*) 


barra rovescia (\) 


due punti 


(:) 


più 


<+) 


segno di numero ( # ) 


punto interrogativo 


(?) 


trattino 


(-) 


uguale (=) 


virgolette 


(") 


barra 


(/) 


virgola (,) 


apice 


C) 


spazio 










oppure un 


qualsiasi carattere di controllo 







PASSWORD 

L'utente può proteggere un volume o un file tramite una password (parola 
d'ordine). 

Una password può essere usata per abilitare un volume: un volume è abi- 
litato se non ha password oppure se l'utente ha specificato questa 
password in un comando BASIC o PCOS. 

L'utente deve specificare la password in modo corretto tutte le volte che 
nomina un volume o un file ai quali è stata assegnata una password. 

Nota : Né il. BASIC né il PCOS consentono di venire a conoscere una 
password nell'eventualità che l'utente l'abbia dimenticata. 
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INTRODUZIONE, LISTING ED ESECUZIONE DI UN PROGRAMMA 

PASSWORD DI VOLUME 



SE l'utente vuole... 



ALLORA... 



assegnare una password 
a un volume 



accedere a un volume 
che ha una password 
(o a un suo file) 



rimuovere una password 
da un volume 



deve impostare il comando 
specificando la password. 

Per esempio: 



VPASS del PCOS 



vp MYVOL: .MYPASS CU 



SE 



il volume ha già una password, questa deve 

esser specificata con il comando VPASS, che, in 

questo caso, cambierà la password. 
Per esempio: 

vp V0L1/0LDPASS:,NEWPASS K!l 



deve abilitare quel volume, specificandone la 
password dopo il nome di volume o dopo il 
numero dell'unità disco, in un comando BASIC o 
PCOS oppure in una istruzione OPEN. 

Nota : Una volta che una password di un 
dischetto é stata specificata, non é più 
necessario specificarla un'altra volta finché 
il dischetto non venga rimosso e un'altro 
dischetto venga selezionato sulla stessa unità. 

Per l'hard disk, una volta che la password è 
stata specificata, non è più necessario speci- 
ficarla un'altra volta finché il PCOS non venga 
reinizializzato. 



deve impostare il comando VDEPASS del PCOS 

Nota : L'utente deve conoscere la password per 
poter usare il comando VDEPASS. 



impedire la visualizza- 
zione di una password 
di volume 



deve impostare ED39 H- H cursore cambia 
forma e frequenza di lampeggio e i caratteri 
impostati successivamente non vengono visua- 
lizzati (Hide State). 

Per ritornare a visualizzare i caratteri 
impostati (Display State), l'utente deve impo- 
stare di nuovo MI:W W oppure ■«!:■ 
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PASSWORD DI FILE 



SE 1 'utente vuole .... 


ALLORA 


assegnare una password 
a un file 


deve impostare il comando FPASS del PCOS 
specificando la password. 

SE 

il file ha già una password, questa deve 
essere specificata con il comando FPASS 
che, in questo caso, cambierà la password. 


assegnare una password 
a un file programma 
(che ne é sprovvisto) 


può impostare il comando FPASS del PCOS 
oppure il comando SAVE del BASIC specificando- 
ne la password: 

Per esempio: 

SAVE "FILEABC/PASSABC M*M' 


accedere a un file che 
ha una password 


deve specificare la password dopo il nome 
del file. 

Per esempio: 

LOAD "F1LEZ/PASSZ1 " Kil 

Se anche il volume ha una password, l'utente 
deve specificarla (a meno che il volume 
sia già stato abilitato) 


rimuovere una password 
da un file 


deve impostare il comando FDEPASS del PCOS 

Nota: L'utente deve conoscere la password 
del file per poterla rimuovere o cambiare 


impedire la visualizza 
zione di una password 
di file 


deve impostare ■jQH^I Kfl. 11 cursore 
cambia forma e frequenza di lampeggio e 
i caratteri impostati non vengono visualizzati 
(Hide State). 

Per ritornare a visualizzare i caratteri 
impostati, l'utente deve premere di nuovo 
MIM U oppure BJj. 
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INTRODUZIONE, LISTING ED ESECUZIONE DI UN PROGRAMMA 



PROTEZIONE DA SCRITTURA 

L'utente può proteggere da scrittura sia un intero dischetto che un 



singolo file. 


SE 1 'utente vuole . . . 


ALLORA ... 


Droteooere ris scrit— 
tura un volume (cioè 
evitare qualsiasi o- 

tura su quel dischetto) 


Hpwp nritor'nprp 1 'anni^ci f n intani irt i~ i-> n ima 

etichetta metallizzata. 

Nota: Non è possibile proteggere da scrittura 
l'hard disk, ma solo i file residenti su di 
esso . 


togliere la protezio- 
ne da scrittura a un 
dischetto 


deve togliere l'etichetta metallizzata 


proteggere da scrit- 
tura un file 


deve impostare il comando FWPROT del PCOS, 
specificando l'identificatore di file. 


togliere la proto - 
zione da scrittura 


deve impostare il comando FUNPROT del PCOS, 
specificando l'identificatore di file 



REGISTRAZIONE DI UN P R OGRAMMA 

Un programma resta in memoria finché la macchina é accesa. Appena si 
spegne la macchina, la memoria viene azzerata e si perde quindi il 
programma. Perciò se l'utente vuole conservare una copia del programma 
che ha appena introdotto in memoria da tastiera, deve impostare il 
comando SAVE (che registra il programma su disco). 

Può essere utile registrare il programma anche in altre occasioni che 
vengono indicate nella seguente tabella. In ognuno dei seguenti casi si 
suppone che il disco sia abilitato, altrimenti l'utente deve specificare 
la password di volume mediante il comando SAVE. Inoltre se si vuole 
registrare il programma su un dischetto, questo non deve ovviamente 
essere protetto da scrittura. 
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SE 1 'utente vuole. . . 


ALLORA... 


spegnere la macchina 


deve registrare il programma residente in 
memoria (supposto che non ne esista già una 
copia su disco) 


introdurre un altro 
programma da tastiera 


deve registrare il programma residente in 
memoria (supposto che non ne esista già una 
copia su disco) 


trasferire un altro 
programma da disco a 
memoria (tramite un 
comando LOAD o RUN) 


deve registrare il programma residente in 
memoria (supposto che non ne esista già una 
copia su disco). 


passare in PCOS (tra- 
mite il comando SYS- 
TEM) 


deve registrare il programma residente in 
memoria (supposto che non ne esista già una 
copia su disco). 


sostituire la ver- 
sione precedente del 
suo programma 


deve registrare il programma residente in 
memoria, specificando lo stesso nome della 
versione precedente 

E 

la stessa password (se la versione precedente 
aveva una password) 


registrare in formato 
ASCII il programma 
residente in memoria 


deve specificare l'opzione A nel comando SAVE 


proteggere il program- 
ma residente in memo- 
ria contro ogni ten- 
tativo di listarlo, 
modificarlo, o regi- 
strarlo di nuovo 


deve specificare l'opzione P nel comando SAVE 



Nota : Durante un'operazione di registrazione la luce rossa dell'unità 
disco si accende. Quando si spegne, il programma è registrato e il 
messaggio Ok appare su video. 
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INTRODUZIONE, LISTING ED ESECUZIONE DI UN PROGRAMMA 



SA VE (PROGRAMMA/IMMEDIATO) 

Registra il programma residente in memoria su disco e gli assegna un 
nome ed eventualmente una password 




Figura 2-8 Comando SAVE 
Dove 



~ — 1 

ELEMENTO 1)1 SINTASSI 


1 "" 

SIGNIFICATO 


file identifier 


può essere sia una costante che una variabile 
stringa. Specifica il nome del programma da 
registrare su disco. Può includere una password 
di file e un identificatore di volume 


A 


specifica che il programma deve essere regi- 
strato su disco in formato ASCII 


P 


specifica che il programma deve essere regi- 
strato su disco protetto contro ogni tentativo 
di listarlo, modificarlo o registrarlo di nuovo 


Esempi 



In ognuno dei seguenti esempi si suppone che il disco sia abilitato e non 
sia protetto da scrittura. 
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SE l'utente imposta... 


ALLORA. . . 


SAVE "RETTANG0L01 " EÌM 


il programma RETTANG0L01 viene registrato 
sul disco inserito nell'ultima unità 
selezionata. 

RETTANGOLA non ha password 


SA VE "0: RETTANGOLO!" BM 


il programma RETTANGOLA viene registrato 
sul dischetto inserito nella unità 0. 

RETTANG0L01 non ha password 


SAVE "10: RETTANGOLA" ESM 


il programma RETTANG0L01 viene registrato 
sull ' hard disk. 

RETTANGOLA non ha password 


SAVE "V0L1: RETTANGOLA " f£l 


il programma RETTANGOLA viene registrato 
su V0L1 , che può essere inserito in 
entrambe le unità (dato che l'utente ha 
specificato il nome del volume). 

RETTANGOLA non ha password 


SAVE "V0L1 :R1/PASS" Kl 


RI viene registrato su V0L1, che può 
essere inserito in entrambe le unità e 
assegna la password PASS al file R1 . 



Sostituzione di un file 

Si suppone, negli esempi che seguono, che il volume sia abilitato e non 
sia protetto da scrittura. 



SE l'utente imposta... 
SAVE "FILE1" 



E SE... 



F1LE1 esiste già 
sul disco sele- 
zionato 
E 

non ha password 



ALLORA... 



il programma residente 
in memoria sostituirà la 
versione precedente con 
lo stesso nome. 
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SAVE "F ILEI /PASSI " 



F1LE1 esiste già 
sul disco sele- 
zionato 
E 

ha password PASSI 



il programma residente 
in memoria sostituirà la 
versione precedente con 
lo stesso nome e la 
stessa password 



F ILEI esiste già 
sul disco sele- 
zionato 
E 

ha una password 
differente 

F ILEI esiste già 
sul disco sele- 
zionato 
E 

non ha password 



non avviene sostituzio- 
ne, e il sistema emette 
un messaggio d'errore 
(vedere Appendice C) 



il programma residente 
in memoria sostituirà la 
versione precedente con 
lo stesso nome, e l'at- 
tuale versione avrà la 
password PASSI 



Opzione A 

Se l'utente specifica l'opzione A, il file viene registrato in formato 
ASCII. 

Se egli, invece, non specifica l'opzione A (cioè nessuna opzione o 
l'opzione P), il file viene registrato in formato binario "compatto". 

11 formato ASCII occupa più spazio su disco che il formato "compatto", ma 
alcuni comandi richiedono che i file siano in formato A5C11, come ad 
esempio il comando MERGE. 



SE 1 


utente imposta... 


ALLORA. . . 


SAVE 


"GEOMETRY",A P:l 


il programma GEOMETRY viene registrato in 






formato ASCII (cioè in una sequenza di 






caratteri ASCII) sul disco inserito nel- 






l'ultima unità selezionata 






GEOMETRY non ha password. 






Si suppone che il disco sia abilitato. 
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Opzione P 



Se l'utente specifica l'opzione P, il file non è soltanto registrato in 
formato binario "compatto", ma anche "protetto" contro ogni tentativo di: 

- listarlo 

- modificarlo 

- registrarlo di nuovo 

Nota: L'utente non può rimuovere la protezione P. 



SE l'utente imposta... 
SAVE "0: GEODESY", P Wil 



ALLORA... 



GEODESY viene registrato in formato bina- 
rio "compatto" e "protetto" sul disco 
inserito nella unità 0. 

GEODESY non ha password. Si suppone che il 
disco sia abilitato. 



TRASFERIMENTO DA DISCO A MEMORIA 

Se il programma che l'utente vuole portare in memoria risiede su disco, 
l'utente deve impostare un comando LOAD. 

LOAD, nel trasferire un programma in memoria, ricopre qualsiasi altro 
programma ivi residente, perciò, prima di impostare un comando LOAD, 
l'utente dovrà provvedere a registrare su disco il programma attuale 
(supposto che non ne abbia già una copia). 

Per accedere a un programma su disco tramite un comando LOAD, il disco 
deve essere abilitato (altrimenti l'utente deve specificare la password). 
Per accedere ad un programma dotato di password, l'utente deve 
specificarne la password sempre tramite il comando LOAD. 

Se l'utente specifica l'opzione R tutti i file dati che erano stati 
aperti dal programma ricoperto rimangono aperti, inoltre il nuovo 
programma non solo viene trasferito in memoria ma viene anche eseguito 
(senza che l'utente debba impostare RUN). 
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LOAD (PROGRAMMA/IMMEDIATO) 

Trasferisce un programma da disco in memoria e ne lancia l'esecuzione (se 
l'utente specifica l'opzione R). 




Figura 2-9 Comando LOAD 




Dove 




ELEMENTO DI SINTASSI 


SIGNIFICATO 


file identifier 


può essere sia una costante che una variabile 
stringa; specifica il file programma, che deve 
essere trasferito in memoria da disco 


R 


specifica che tutti i file dati aperti dal 
programma precedente vengano lasciati aperti e 
che il nuovo programma, dopo essere stato 
trasferito da disco in memoria, venga anche 
eseguito 



Esempi 



SE l'utente imposta... 


ALLORA... 


LOAD "10; RETTANGOLO! " !£■ 


il programma RETTANG0L01 viene tra- 
sferito in memoria dall'hard disk. 

Si suppone che RETTANG0L01 non abbia 
password e che il disco sia abilitato 
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LOAD "VOLI : RETTANGOLO"! /P1 " il programma RETTANGOLA viene tra- 

sferito da disco a memoria. 

RETTANGOLA ha come password P1 e 
risiede sul disco VOLI che può essere 
inserito sia nella prima che nella 
seconda unità. 

Si suppone che V0L1 sia abilitato. 

LOAD "V3/P3:FAA" B:l il programma FAA viene trasferito da 

disco a memoria. FAA risiede sul 
disco V3 che ha la password P3. Il 
disco V3 può essere inserito sia 
nella prima che nella seconda unità. 

11 comando LOAD, in questo caso, 
abilita anche il disco V3, dato che 
ne specifica la password. 

Si suppone che FAA non abbia pass- 
word. 



il programma, individuato dal conte- 
nuto della variabile B$, viene tra- 
sferito in memoria. 



LOAD B$ t*:9 



Opzione R 

Se l'utente specifica l'opzione R, tutti i file dati che erano stati 
aperti dal programma precedentemente eseguito restano aperti e viene 
anche lanciata l'esecuzione del nuovo programma trasferito da disco in 
memoria (senza che l'utente debba impostare il comando RUN). 

Se l'utente non specifica l'opzione R, il comando LOAD chiude tutti i 
file dati che erano stati aperti dal programma precedentemente eseguito. 

Si noti che: 

LOAD file identifier, R Mi:9 
e RUN file identifier, R Iftl 
sono comandi equivalenti 
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INTRODUZIONE. LISTING ED ESECUZIONE DI UN PROGRAMMA 



SE l'utente imposta... ALLORA... 

LOAD "ACCOUNT", R W:M il programma ACCOUNT viene trasferito in 

memoria da disco e viene eseguito; tutti i 
file che erano stati aperti dal programma 
precedente restano aperti. ACCOUNT risiede 
sull'unità selezionata per ultima. 

ACCOUNT non ha password e il disco su cui 
risiede deve essere abilitato. 



ESECUZIONE DI UN PROGRAMMA 

Una volta che un programma è in memoria può essere eseguito. Per dire al 
sistema M20 di eseguire un programma, si deve impostare un comando RUN, 
(oppure un comando LOAD con l'opzione R). 

11 comando RUN esegue tutte le operazioni richieste dal, programma 
residente in memoria, o trasferisce un programma da disco e poi le 
esegue. Quando il comando RUN specifica il nome di un file programma, può 
includere : 

- una password di file, se il file ha una password 

- una password di volume, se il volume ha una password (e non è stato 
ancora abilitato) 

Se l'utente specifica l'opzione R, tutti i file dati che erano stati 
aperti dal programma precedente, restano aperti. 

Prima di impostare RUN f ile-identif ier (oppure RUN f ile-identifier,R) , 
l'utente deve registrare su disco il programma residente in memoria 
(ammesso che non ne abbia già una copia). 

Le istruzioni BASIC vengono eseguite seguendo la sequenza del numero di 
linea, a meno che un'istruzione di controllo (GOTO, ON... GOTO, 1F... 
GOTO... ELSE, 1F. . .THEN. . .ELSE, FOR/NEXT, WH1LE/WEND) o il richiamo di un 
sottoprogramma (GOSUB, 0N...G0SUB), specifichi altrimenti. 
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RUN (PROGRAMMA/ IMMEDIATO) 




Lancia l'esecuzione del programma residente in memoria. Se il comando RUN 
specifica il nome di un programma su disco, questo viene trasferito in 
memoria ed eseguito. 




Figura 2-10 Comando RUN 
Dove 



ELEMENTO DI SINTASSI 
line number 



file identifier 



SIGNIFICATO 



specifica il numero di linea da dove inizia 
l'esecuzione del programma. Se l'utente non 
specifica questo numero il programma viene 
eseguito a partire dalla prima istruzione 

Nota : RUN line number e GOTO line number 
hanno la stessa funzione salvo il fatto che 
RUN ha anche la funzione di azzerare le 
variabili (cioè porre a zero le variabili 
numeriche e assegnare la stringa nulla alle 
variabili stringa) 

può essere sia una costante che una variabi- 
le stringa; specifica il file programma che 
deve essere trasferito in memoria da disco 
ed eseguito 

questa opzione specifica che tutti i file 
dati aperti dal programma precedente esegui- 
to devono restare aperti. Se l'opzione non è 
specificata tutti i file dati vengono 
automaticamente chiusi prima di iniziare 
l'esecuzione del nuovo programma 
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INTRODUZIONE, LISTI NG ED ESECUZIONE DI UN PROGRAMMA 



Esempi 

Negli esempi seguenti si suppone che il disco selezionato sia abilitato 



SE l'utente imposta... 


ALLORA... 


RUN Bl 


il programma residente in memoria viene 
eseguito 


RUN 150 la 


il programma residente in memoria viene 
eseguito a partire dalla istruzione 150 


RUN "1 :Newfile" Iti 


il programma Newfile viene trasferito da 
disco in memoria ed eseguito. 11 pro- 
gramma risiede sul dischetto inserito 
nella unità 1. 

Si suppone che Newfile non abbia pass- 
word 


RUN "NewVOL:Newfile" EM 


il programma Newfile viene trasferito da 
disco a memoria ed eseguito. Newfile 
risiede sul disco NewVOL che può essere 
inserito nella prima o nella seconda 
unità . 

Si suppone che Newfile non abbia pass- 
word 


RUN "1 :Newfile/NewPASS" ESM 


il programma Newfile viene trasferito da 
disco a memoria ed eseguito. 11 program- 
ma ha la password NewPASS e risiede sul 
dischetto inserito nella unità 1. 


RUN A $ Iti 


Il programma specificato tramite il 
contenuto della variabile A$ viene 
trasferito da disco in memoria ed 
eseguito 
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Opzione R 



Se l'utente specifica l'opzione R nel comando RUN, tutti i file dati 
aperti dal programma eseguito in precedenza restano aperti. 

Se l'utente non specifica l'opzione R, tutti i file dati vengono chiusi 
prima di lanciare l'esecuzione del nuovo programma. 

Si noti che: 

RUN file identifier, R BH» 
e 

LOAD file identifier, R FE1 
sono comandi equivalenti 



Se l'utente imposta... ALLORA... 

RUN "10:Newf ile",R ii programma Newfile viene trasferito da hard 

disk in memoria ed eseguito. 1 file dati aperti 
dal programma eseguito in precedenza restano 
aperti. 

Si suppone che Newfile non abbia password e che 
l'hard disk sia abilitato. 
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INTRODUZIONE, LISTING ED ESECUZIONE DI UN PROGRAMMA 



Interruzione dell'Esecuzione 



SE ... 

l'utente imposta IHM 

OPPURE 

viene eseguita una 
istruzione STOP 



ALLORA 



viene riscontrato un 
errore (ad esclusione 
di un errore sintattico) 



viene riscontrato un 
errore sintattico 



si ha una interruzione del program- 
ma, viene emesso il messaggio'Break 
in line nnnnn" e l'M20 entra in 
Stato Comandi. 

Nessun file dati viene chiuso. 
L'utente può visualizzare i valori 
delle variabili (tramite l'istru- 
zione immediata PR1NT) o modificare 
i valori (tramite l'istruzione 
immediata LET) 

L'utente può riprendere l'esecuzio- 
ne impostando il comando CONT (a 
condizione che nessuna istruzione 
sia stata modificata). 



Si ha una interruzione del program- 
ma e l'M20 entra in Stato Comandi. 
Nessun file dati viene chiuso. 
L'utente può visualizzare i valori 
delle variabili, ma non può ripren- 
dere l'esecuzione. 



si ha una interruzione del program- 
ma, viene emesso il messaggio 
d'errore e l'M20 entra in Stato 
Editor di linea, alla linea che ha 
causato l'errore. 

L'utente può modificare la linea 
con i comandi dell'Editor, ma non 
può visualizzare le variabili (a 
meno che non entri in Stato Comandi 
premendo W ). L'esecuzione non può 
essere ripresa. 
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viene eseguita 
una istruzione END 



Tutti i file dati vengono chiusi. 

L'utente può visualizzare i valori 
delle variabili (tramite l'istru- 
zione immediata PR1NT), ma non può 
riprendere l'esecuzione. 



Arresto dell'Output su Video 



SE ... 


ALLORA ... 


l'utente imposta 


L'output su video viene arrestato. 


oca H 






L'utente può far riprendere l'out- 




put su video premendo un tasto 




qualsiasi . 




I file dati non vengono chiusi. 




L'utente non può visualizzare i 




valori delle variabili. 

1 
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3. AGGIORNAMENTO E MODIFICA DI UN 
PROGRAMMA 



SOMMARIO 



Anche un buon programmatore ha spesso necessità di correggere e modifica- 
re i propri programmi. Un programma può essere modificato in vari modi: 
cancellando linee, sostituendo linee, inserendo linee, rinumerando le 
linee, modificando parti di linea con l'Editor. 

Questo capitolo illustra tutte queste possibilità facendo uso del 
programma RETTANG0L01 . Verrà inoltre spiegato come rinominare un file, 
come cancellarlo su disco, come fare il MERGE di due programmi, come 
listare i nomi dei file di un disco. Si tenga presente che qualunque 
modifica a un programma, chiude tutti i file dati eventualmente ancora 
aperti, azzera le variabili numeriche e inizializza le variabili stringa 
col valore stringa nulla. 



INDICE 

COME CANCE LLARE LE LINEE 3-1 

DELETE (IMMEDIATO) 3-2 

SOSTITUZIONE DI LINE E 3-3 

INSERIMENTO DI LINEE 3-4 

COME R1NUMERARE LE LINEE 3-5 

MODIFICA AUTOMATICA DEI 3-6 
NUMERI DI LINEA RIFERITI 

RENUM (IMMEDIATO) 3-6 

MODIFICA DI LINEE CON 3-8 
L'EDITOR DI LINEA 

ED1T (IMMEDIATO) 3-8 

COMANDI DELL'EDITOR 3-9 

ESAME DEI VALORI A TTUALI 3-14 
DELLE VARIABILI 

COME RIN OMINARE UN FILE 3-15 

NAME (PROGRAMMA/ IMMEDIATO) 3-15 



COME CANCELLARE UN FILE 3-16 

K1LL (PROGRAMMA/IMMEDIATO) 3-16 

COME FARE IL MERGE 3-17 
DI DUE PROGRAMMI 

MERGE (PROGRAMMA/IMMEDIATO 3-18 

COME LISTARE I NOME DEI 3-19 
FILE REGISTRATI SU DISCO 

F1LES (PROGRAMMA/IMMEDIATO) 3-20 



AGGIORNAMENTO E MODIFICA DI UN PROGRAMMA 



COME CANCELLARE LE LINEE 

A scopo dimostrativo useremo il programma RETTANG0L01 già utilizzato nel 
capitolo 2. 

Se il programma RETTANGOLO^ risiede in memoria, l'utente deve per prima 
cosa impostare il comando LIST. 



VIDEO 


LUnnhN I 1 


LIST 


RETTANG0L01 ha due istruzioni 


10 REM RETTANGOLA 


di Input per introdurre da 


20 INPUT "Base";B 


tastiera i valori di B e H. 


30 1F B<=0 THEN 20 


Conviene moficare il program- 


40 INPUT "Altezza" ;H 


ma in modo da avere una sola 


50 1F H<=0 THEN 40 


istruzione di Input. Per 


60 LET AREA=B*H 


prima cosa cancelliamo l'i- 


70 PR1NT "Area=";AREA;" B-";B;" H=";H 


struzione 40. 


80 GOTO 20 




90 END 




Ok 





Se l'utente vuole cancellare la linea 40, deve impostare: 

uuiiiiuii ma DiiBi 

oppure 

■■■ira 

Per vedere il risultato di questo comando, l'utente deve impostare un 
altro comando LIST. 
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VIDEO 




COMMENTI 


LIST 




In questa versione RETTANGOLOI 


10 REM RETTANGOLOI 




non può essere eseguito. L'u- 


20 INPUT "Base";B 




tente deve correggere sia 


30 1F B<=0 THEN 20 




l'istruzione 20 (che richiede 


50 IF H<=0 THEN 40 




di introdurre un solo valore), 


60 LET AREA=A*H 




che l'istruzione 50 (che fa 


70 PR1NT "Area=";AREA;" B=";B;" H=";H 




riferimento a un numero di 


80 GOTO 20 




linea che non esiste più). 


90 END 




Correggeremo il nostro pro- 


OK 


gramma nelle pagine successi- 




ve. 



DELETE (IMMEDIATO) 

Cancella le linee di programma. L'M20 ritorna in Stato Comandi dopo che è 
stato eseguito un comando DELETE. 




Figura 3-1 Comando DELETE 
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AGGIORNAMENTO E MODIFICA DI UN PROGRAMMA 



Esempi 


_>t l utente imposta. . . 


Al 1 OCA 


DELETE . EàM 


la linea attuale viene cancellata 


500 Bl 

OPPURE 
DELETE 500 WTM 


la linea 500 viene cancellata 


DELETE 100-200 Bl 


tutte le linee tra la 100 e la 200 comprese 
vengono cancellate 


DELETE -400 Iti 


tutte le linee dall'inizio del programma fino 
alla linea 400 compresa vengono cancellate. 



Nota: Se l'utente specifica con il comando DELETE dei numeri di linea che 
non esistono nel programma residente in memoria, il BASIC emette il 
messaggio "Ulegal function cali". 



SOSTITUZIONE DI LINEE 

Per modificare una linea l'utente può: 

- sostituire l'intera linea, impostando il numero di linea e il suo nuovo 
contenuto, oppure 

- modificare una parte di linea utilizzando l'Editor di linea. 

Dapprima usiamo il primo metodo e sostituiamo la linea 20 e la linea 50 
del programma RETTANG0L01 , impostando: 

20 INPUT "Base e Altezza";B,H HM 
50 1F H<=0 THEN 20 Bl 

e il programma sarà così listato: 



3-3 



VIDEO 


COMMENTI 


LIST 




Questa versione di 


10 REM RETTANGOL01 




RETTANGOLA è corretta. 


20 INPUT "Base e Altezza"; 


3,H 


Comunque per terminare 


30 1F B<=0 THEN 20 




l'esecuzione, l'utente 


50 1F H<=0 THEN 20 




dovrà ancora impostare: 


60 LET AREA=B*H 






70 PRINT "Area=";AREA;" B= 


';B;" H=";H 




80 GOTO 20 






90 END 






Ok 







Però non è pratico dover impostare MÉi.M M alla fine dell'esecuzione 
del programma, pertanto faremo alcune ulteriori modifiche. Possiamo 
sostituire alla linea 80, le seguenti due linee: 

1) INPUT "Ancora:Sl=S,NO=N";XS 

2) 1F XS="5" THEN 20 

Per sostituire l'istruzione GOTO alla linea 80, l'utente deve impostare: 
80 INPUT " Ancora :S1=S,N0=N";X5 PI 
Nota : X$ è una variabile stringa. 



INSERIMENTO DI L1NEF 

Ora dobbiamo inserire l'istruzione 2) fra la linea 80 e la linea 90. 
Possiamo scegliere 85 come numero di linea e impostare: 

85 1F X$= "S" THEN 20 Bl 

Ora impostiamo un altro comando LIST: 
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VIDEO 




COMMENTI 


LIST 




Questa versione di 


10 REM RETTANGOL01 




RETTANGOLO! non richie- 


20 INPUT "Base e Altezza";B,H 




de che l'utente imposti 


30 1F B<=0 THEN 20 




■SV1S H per arre- 


50 IF H<=0 THEN 20 




starne l'esecuzione. 


60 LET AREA=B*H 




Però la sequenza dei 


70 PR1NT "Area=";AREA;" B=";B;" H=";H 




numeri di linea non ha 


80 INPUT "Ancora:SI=S,NO=N";X$ 




più un intervallo di 


85 IF X$="S" THEN 20 




10. 


90 END 





Ok 



Quando l'utente lancia l'esecuzione del programma, ecco cosa succede: 
dopo aver calcolato l'area del rettangolo corrispondente ai valori 
introdotti della base e dell'altezza, il programma chiede all'utente se 
vuole continuare a introdurre altri valori. In caso affermativo, l'utente 
premerà S. L'istruzione 85 riporta allora il controllo all'istruzione 20 
e si ripete la sequenza di calcolo. In caso negativo, l'utente premerà N. 
L'istruzione 85 non riporta in tal caso il controllo all'istruzione 20, 
ma viene eseguita l'istruzione successiva che è un'istruzione END che 
arresta l'esecuzione del programma. 



COME RIMUNERARE LE LINEE 

Come abbiamo visto, l'attuale numerazione delle linee di RETTANGOLO! non 
ha più un intervallo di 10. Ciò non ha importanza quando il programma è 
semplice, ma quando il programma è complesso e suscettibile di ulteriori 
modifiche, una numerazione delle linee casuale è sempre sconsigliabile. 

Il comando RENUM consente di rinumerare le linee di un programma, 
iniziando ad esempio con 10 e con un intervallo di 10 tra le linee. 
L'utente deve solo impostare: 

uuuuy 133 

Per vedere il risultato, l'utente deve impostare un altro comando LIST. 
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LIST 




10 REM RETTANG0L01 




20 INPUT "Base e Altezza"; 


B,H 


30 1F B<=0 THEN 20 




40 1F H<=0 THEN 20 




50 LET AREA=B*H 




60 PR1NT "Area=";AREA;" 3= 


';B:" H=";H 


70 INPUT "Ancora:SI=S,NO=N 


•;XS 


80 1F X$="S" THEN 20 




90 END 




Ok 





MODIFICA AUTOMATICA DEI NUMERI DI LINEA RIFERITI 

Quando un programma viene rinumerato tramite il comando RENUM, tutti i 
numeri di linea riferiti all'interno del programma vengono aggiornati in 
modo automatico. Per es., se un programma contiene l'istruzione GOTO 140 
e la linea 140 viene rinumerata, il riferimento a questa linea 
nell'istruzione GOTO sarà aggiornato in modo automatico. 

Regola Generale 

11 comando RENUM modifica tutti i numeri di linea riferiti dopo GOTO, 
GOSUB, THEN, ELSE, ON... GOTO, 0N...G0SUB e ERL, correntemente alla nuova 
numerazione delle linee. 

Se in un programma si fa riferimento a linee non esistenti, il comando 
Renum fa comparire il messaggio seguente: 

Undefined line XXXXX in YYYYY. 

11 programma sarà rinumerato correttamente e i riferimenti a linee non 
esistenti rimarranno immutati. 



RENUM (IMMEDIATO) 




Modifica i numeri di linea del programma residente in memoria. 
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I » ■ -»^^_fj ola line 



l. 



Figura 3-2 Comando RENUM 



Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


VALORI DI DEFAULT 


new line number 


è il primo numero 
di linea della nuo- 
va numerazione 


10 


old line number 


è il primo numero 
di linea della pre- 
cedente numerazione 


se omesso corrispon- 
de alla prima linea 
del programma 


interval 


è il nuovo interval- 
lo tra i numeri 
di linea 


10 


Esempi 


SE 1' utente imposta... 


ALLORA... 


RENUM m 


l'intero programma viene rinumerato. 11 primo 
numero di linea nella new line number è 10 e 
viene assunto un intervallo di 10 (valori di 
default) 


RENUM 100 MÌM 


L'intero programma viene rinumerato. Il primo 
numero di linea è 100 e viene assunto un 
intervallo di 10 (valore di default). 
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RENUM 150,, 20 EHI 



L'intero programma viene rinumerato. Il primo 
numero di linea è 150 e viene assunto un 
intervallo di 20 



MODIFICA DI LINEE CON L'EDITOR DI LINEA 

In Stato Editor è possibile modificare parti di una linea, senza dover 
riscrivere l'intera linea. 

L'M20 entra in Stato Editor di linea se: 

- l'utente imposta un comando ED1T, oppure 

- viene riscontrato un errore di sintassi. 

Dopo essere entrato in Stato Editor, l'M20 visualizza il numero della 
linea da modificare (che è seguito da uno spazio) e resta in attesa che 
l'utente imposti un comando dell'Editor. Questi comandi non vengono 
visualizzati quando l'utente li introduce, infatti, in Stato Editor, 
l'M20 interpreta i caratteri introdotti di volta in volta che l'utente li 
imposta, senza aspettare che l'utente prema 



ED IT (IMMEDIATO) 

11 comando ED1T fa si che l'M20 entri in Stato Editor alla linea 
specificata . 




Figura 3-3 Comando ED1T 
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Esempi 


5E l'utente imposta... 


ALLORA l'M20 visualizza... 


ED1T . Pll 


nn...n (entrando in Stato Editor alla linea 

attuale) In questo caso nn n indica il 

numero della linea attuale 


ED-1T 300 PI 


300 (entrando in Stato Editor alla linea 
specificata (quindi alla 300)) 


COMANDI DELL'EDITOR 






La seguente tabella illustra i comandi dell'Editor 
pati in classi. 


che vengono raggrup- 


CLASSE 


COMANDO 


o IbrUr ILA 1 U 


inizio modifiche 


B (Lista) 


visualizza lo stato 
attuale della linea. 
Il numero della li- 
nea attuale viene 
visualizzato al- 
l'inizio della linea 
successiva. 




U (Again-Ancora) 


ripristina la linea 
originaria senza vi- 
sualizzarla. Il nu- 
mero della linea at- 
tuale viene di nuovo 
visualizzato al- 
l'inizio della linea 
successiva. 


spostamento cursore 




visualizza gli n ca- 
ratteri successivi e 
sposta il cursore a 
destra di una posi- 
zione. 
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U*t:m Q (Backspace) 



inserimento caratteri 



[Inserisce) 



O (Extended Line- 
Inserisce a fine 
linea) 



IBI 



Cancella 
caratteri 



O (Delete- 

Cancella un carattere) 



Cancella l'ultimo 
carattere della li- 
nea e sposta il 
cursore a sinistra 
di una posizione. 

entra in Stato Inse- 
rimento all'attuale 
posizione del curso- 
re. L'utente può 
inserire una stringa 
di caratteri e i 
caratteri inseriti 
vengono visualizza- 
ti. Per uscire dallo 
Stato Inserimento, 
l'utente deve impo- 
stare BH tSSÈM 



visualizza l'ultima 
parte della linea, 
sposta il cursore 
alla fine della li- 
nea e entra in Stato 
Inserimento 

esce dallo Stato 
Inserimento, ma ri- 
mane in Stato Edi- 
tor. Se l'utente 
preme esce sia 

dallo Stato Inseri- 
mento che dallo Sta- 
to Editor 

cancella il caratte- 
re successivo che 
viene visualizzato 
tra due barre rove- 
sce ( \ ) e il curso- 
re viene posizionato 
alla sua destra 
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O O (Delete- 
Cancella n caratteri) 



O (Hack-Tronca) 



ricerca caratteri 



O O (Search- 
Ricerca la prima 
occorrenza di x) 



cancella i succes- 
sivi caratteri. 1 
caratteri cancellati 
sono visualizzati 
tra due barre rove- 
sce ( \ ) ; il cursore 
viene posizionato 
alla destra del- 
l'ultimo carattere 
cancellato. 

Se la linea ha meno 
di n caratteri ella 
destra del cursore, 
WSM HÌH cancella 
l'ultima parte della 
1 inea 

cancella l'ultima 
parte della linea e 
entra in Stato Inse- 
rimento 

ricerca la prima 
occorrenza di "x" 
nella linea (dove 
"x" è un qualsiasi 
carattere stampabile 
ASCII) e posiziona 
il cursore subito 
prima di questo ca- 
rattere. 11 caratte- 
re alla posizione 
attuale del cursore 
non viene incluso 
nella ricerca. Se il 
carattere non viene 
trovato nella linea, 
il cursore viene 
portato a fine linea 
e tutti i caratteri 
esaminati durante la 
ricerca vengono vi- 
sualizzati . 
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sostituzione 
caratteri 



W!t KM (Search- 
Ricerca l'n-esima 
occorrenza di x) 



Ci D (Oelete- 
Cancella fino alla 
prima occorrenza di x) 



O O O (Delete- 
Cancella fino al- 
l'n-esima occorrenza di 
x) 



(Cambia 
un carattere) 



□ BOI 

W2M ■ ■ . K3 

(Cambia una stringa 
di n caratteri) 



ha la stessa funzio- 
ne del comando pre- 
cedente, ma ricerca 
l'n-esima occorrenza 
anziché la prima. 

j iia una funzione si- 
mile al comando |3f 
19, ad esclusione 
del fatto che tutti 
i caratteri esamina- 
:i durante la ricer- 
ca vengono cancella- 
ti. 11 cursore viene 
posizionato subito 
prima di "x" e i 
caratteri cancellati 
vengono racchiusi 
tra due barre rove- 
sce (\). 



ha la stessa funzio- 
ne del comando pre- 
cedente, ma ricerca 
l'n-esima occorren- 
za, anziché la pri- 
ma. 



cambia in "x" il 
carattere successivo 
a quello della posi- 
zione del cursore. 



cambia i successivi 
n caratteri nella 
stringa specificata 
(cioè impostata dopo 
19)- Quando l'uten- 
te ha impostato una 
stringa di n carat- 
teri, l'M20 ritorna 
in Stato Editor 
uscendo dallo Stato 
Sostituzione carat- 
teri. 
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uscita dall'Editor 


■1 




visualizza la linea 
modificata e ritorna 

3 l lrt ^t" at^/i iriiiiflnrii 
ai iu JLaiu v, urna i tu i 




H (Exit-Uscita) 




ha la stessa funzio- 
ne di ^GJH ma 

l'ultima parte della 
linea non viene vi- 
sualizzata. 


—1 


O (Quit-Uscita 
con ripristino) 




torna allo Stato 
Comandi e cancella 
tutti i cambiamenti 
fatti alla linea. 



Esempi 

La seguente tabella fornisce alcuni esempi di uso dei comandi dell'Edi- 
tor. 

Si noti che la posizione del cursore viene evidenziata come indicato (_) 
quando l'H20 é in stato Editor. 



SE l'utente imposta... 


ALLORA l'H20 visualizza... 


i qouo kzhs 
■a ii ii t i 


500 _ 


2 19 


500 FOR 1=1 TO 15 STEP 2 
500 - 


3 EZHS (6 volte) 


500 FOR U. 




500 FOR 1=2. 


5 KCTM (5 volte) 


500 FOR 1=2 TO 1_ 


6 U U 


500 FOR 1=2 TO 16. 


7 fiM 


500 FOR 1=2 TO 16 STEP 2 
1 


1 li U II II *WAM 
U U I J EHM 





► 
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2 


u 


510 LET A(I)=1*SIN(X) 
510 _ 


3 


BHW1 (11 volte) 


510 LET A(I)=I*_ 


4 


tlUUUll 


510 LET A<I)=1*C0S_ 


5 


DBQQDI1U 

*mnm U II U II CJ 


510 LET A(1)=I*C0S(X):PR1NT A(l) 
1 


1 


U O U U BEHa — Ei3 


510 _ 


2 


D O 


510 \ LET \ . 


3 


Kiiaa ni volte) 


510 \LET \ A(1)=1*C05( _ 


4 


uun lama m 


510 LET A(1)=I*C0S(Y+ . 


5 


KUi&ia (9 volte) 


510 \LET \ A(I)=1*C0S(Y+X) :PRINT _ 


6 


UHIHIEin I4J 


510 \LET \ A(I)=I*C0S(Y+X): 

PRINT 1,X; 

1 


7 


U U a U Brasa H EiM 510 a(i)=i*cos(y+x):PRint i,x ; 

III 



ESAiE DEI VALORI ATTUALI DELLE VARIABI LI 

Quando l'utente modifica una linea di programma tramite l'Editor di 
linea, tutte le variabili numeriche vengono azzerate e le variabili 
stringa vengono iniziai izzate con il valore "stringa nulla" (""). Inoltre 
vengono chiusi tutti i file dati. Se il BASIC rivela un errore sintattico 
durante l'esecuzione di un programma, passa automaticamente in Stato 
Editor. Prima di modificare una linea, l'utente potrebbe aver la 
necessità di sapere i valori attuali delle variabili. In questo caso 
dovrà premere il tasto WW . come primo comando di Editor. Questo comando 
fa passare dallo Stato Editor allo 5tato Comandi, dove è possibile 
esaminare i valori delle variabili. Qualsiasi altro comando di Editor 
(premendo il tasto oppure M£M ecc.) azzererà tutte le variabili 

numeriche e inizializzerà tutte le variabili stringa con il valore 
"stringa nulla" (""), rendendo perciò impossibile l'esame dei valori 
delle variabili. 
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COME RINOMINARE UN FILE 

L'utente può cambiare il nome di un file programma o di un file dati 
residenti su disco tramite il comando NAME, purché il disco o il file non 
siano protetti da scrittura. 11 volume selezionato deve includere il nome 
da sostituire, e non deve includere il nuovo nome del file. Dopo che un 
comando NAME è stato eseguito, il file continua a esistere sullo stesso 
disco e nella stessa area di disco, ma ha il nuovo nome. Le password di 
file e di volume (se esistevano), non vengono modificate. L'utente deve 
in tal caso specificare la password di file e il volume deve essere 
abilitato (altrimenti l'utente deve specificare anche la password di 
volume) . 

NAME (PROGRAMMA/IMMEDIATO) 

Cambia il nome di un file su disco. 



NAME 



file 

identifier 



AS 



file 
name 



Figura 3-4 Comando NAME 
Dove 


ELEMENTO 01 SINTASSI 


SIGNIFICATO 


file identifier 


Può essere una costante o una variabile stringa 
e specifica il file programma o dati il cui nome 
deve essere modificato 


file name 


Può essere una costante o una variabile stringa 
e specifica il nuovo nome del file 



Esempi 

Si suppone che nè il volume nè il file siano protetti da scrittura e che 
il volume sia abilitato. 



3-15 



SE l'utente imposta... 


ALLORA... 


NANE "1 :FR1" AS "FRZ" 


il nome di file FR1 viene cambiato in FR2. 11 
file risiede sul dischetto inserito nella unità 
1. FRI non ha password. 


NAME "VOLI :ACC/PACC" 
AS "ACCI " UJ 


Il nome di file ACC viene cambiato in ACCI. 11 
file risiede sul dischetto VOLI che può essere 
inserito sia nella prima che nella seconda 
unità. La password del file resta PACC. 



COME CAN CELLA RE UN FILE 

Tramite il comando K1LL l'utente può facilmente cancellare i file 
programma oppure i file dati registrati su disco, purché il disco non sia 
protetto da scrittura. 11 nome di un file che è stato cancellato, può 
essere riutilizzato per identificare un nuovo file. 

L'utente deve specificare la password del file (se esiste), e il volume 
deve essere abilitato (altrimenti l'utente deve specificarne la 
password) . 

K1LL (PROGRAMMA/IMMEDIATO) 

Cancella un file programma o un file dati registrati su disco. 





Figura 3-5 Comando K1LL 
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Dove 

File identifier può essere una costante o una variabile stringa 
specifica il file da cancellare. 



Esempi 

Si suppone che il volume non sia protetto da scrittura e che sia 
abilitato. 



SE l'utente imposta... 


ALLORA. . . 


KILL "Business. B" ESM 


il file Business. B viene cancellato. Esso 
risiede sull'unità selezionata per ultima. Il 
file non ha password. 


K1LI "1 business. B" BM 


il file Business. B viene cancellato. Esso 
risiede sul dischetto inserito nell'unità 1. 
11 file non ha password. 


KILL "NUMbers/PNUM01" BSJ 


il file NUMbers con password PNUM01 viene 
cancellato. Esso risiede sull'unità seleziona- 
ta per ultima. 



COME FARE IL MERGE DI DUE PROGRAMMI 

11 comando MERGE permette di inserire nel programma in memoria un altro 
programma residente su disco in formato ASCII, in modo da ottenere un 
unico programma. 11 comando MERGE ha una funzione simile al comando LOAD, 
ma il programma residente in memoria non viene cancellato al momento del 
trasferimento in memoria del programma su disco. L'operazione di MERGE 
comporta che le linee del programma su disco vengano inserite (secondo la 
sequenza del numero di linea) nel programma residente in memoria. Se, in 
questo processo di inserimento, due linee hanno lo stesso numero di 
linee, la linea del programma su disco sostituisce quella in memoria. 11 
comando MERGE deve specificare la password di file, se il programma su 
disco ha una password e il disco deve essere abilitato (o l'utente deve 
specificarne la password). 



3-17 



L'operazione di MERGE può ad esempio essere utile per inglobare subrou- 
tine standard in un programma. 

E' buona norma di programmazione fare l'operazione di MERGE tra un pro- 
gramma e subroutine con numeri di linea più alti del massimo numero di 
linee del programma al fine di ridurre il tempo dell'operazione di MERGE 
e di lasciare la possibilità di estendere, eventualmente, il programma. 

MERGE (PROGRAMMA/IMMEDIATO) 

Esegue l'operazione di MERGE tra il programma in memoria e il programma 
registrato su disco (in formato ASCI I ) . 



Figura 3-6 Comando MERGE 
Dove 

11 file identifier può essere una costante o una variabile stringa e 
specifica un file programma in formato ASCII, cioè registrato con 
1 'opzione A. 




Esempi 



VIDEO 



COMMENTI 



MERGE "1 :Fnew/FnewPASS 

Bl 



si fa il MERGE tra il programma Fnew con la 
password FnewPASS e il programma in memoria. 



Nota: 11 dischetto è inserito nella unità 1 
ed è abilitato. 
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MERGE "V001/VP001 :F001/ 

p00v mtm 



si fa il MERGE tra il programma F001 con la 
password P001 e il programma in memoria. 

Nota : In questo caso il disco V001 viene 
abilitato dal comando MERGE con l'uso della 
password VP001 . 



Nota 

MERGE chiude tutti i file dati eventualmente aperti dal programma 
residente in memoria e non ancora chiusi, azzera le variabili numeriche e 
inizializza le variabili stringa col valore stringa nulla. 



COME LISTARE I NOMI DEI FILE REGISTRATI SU DISCO 

Se l'utente non ricorda i nomi dei file programma e/o dati registrati su 
disco, può usare il comando F1LES. 

Questo comando può essere usato sia specificando un identificatore di 
volume che un identificatore di file. 

Quando l'utente specifica un identificatore di volume, tutti i file 
registrati su quel disco vengono listati (sia che abbiano o no una 
password) . 

Per eseguire un comando FILES non è necessario nè conoscere la password 
di volume nè che il disco venga abilitato. 

Quando l'utente specifica invece un identificatore di file, soltanto 
questo file viene listato e l'utente può anche non specificarne la 
passwùi d (se esiste). 

La stessa funzione svolta dal comando FILES può essere realizzata ir. PCOS 
tramite il comando VQU1CK. 

Nota : 11 comando FILES non lista la password. 
11 comando FILES permette di visualizzare: 

- l'unità disco, dove il disco stesso è inserito. 

- il nome del disco (se esiste) 
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- lo spazio libero su disco in settori (dove un settore è pari a 256 
byte). 

- il nome di ogni file su disco, oppure del file specificato, oppure il 
nome dei file selezionati se l'utente utilizza i caratteri "Jolly" (? o 
*) nell'identificatore di file. Si tenga presente che il punto 
interrogativo (?) identifica un carattere qualsiasi e che l'asterisco 
(*) identifica una qualsiasi sequenza di caratteri. 

FILES ( PROGRAMMA/ IMMEDIATO ) 

Lista i file registrati sul disco specificato. 



I 



volume 
identrlior 



fila 

•dentifier 



Figura 3-7 Comando FILES 



Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


volume identifier 


può essere una costante o una variabile stringa 
e specifica il disco di cui si richiede di 
listare i file 


file identifier 


può essere una costante o una variabile stringa 
e specifica il file di cui si richiede di 
visualizzare il nome e l'estensione (in byte) 



— 
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Esempi 



SE l'utente imposta... 


ALLORA... 


F1LES WAM 


viene visualizzato il nome di ogni file residen- 
te sul disco inserito nell'unità selezionata per 
ultima . 


FILES "19:" tiM 


viene visualizzato il nome di ogni file residen- 
te sul disco inserito nella unità 0. 


FILES "10:" Bl 


viene visualizzato il nome di ogni file residen- 
te su hard disk. 


F1LE5 "MYVOL:" Mil 


viene visualizzato il nome di ogni file residen- 
te sul disco MYVOL. Esso può essere inserito sia 
nella prima che nella seconda unità. 


FILES "MYVOL/MYPASS : " 

1*1 


viene visualizzato il nome di ogni file residen- 
te sul disco MYVOL che ha la password MYPASS. 
Esso può essere inserito sia nella prima che 
nella seconda unità. L'utente può specificare o 
meno la password di volume: ciò non é rilevante 
per l'esecuzione di questo comando. 


FILES "MYFILE" !£■ 


viene visualizzato il nome del file MYFILE, che 
è residente sul disco inserito nell'ultima 
unità selezionata. 


FILES "1:*.cmd" Iti 


viene visualizzato il nome di tutti i file 
che hanno l'estensione 'cmd' e che risiedono 
sul dischetto inserito nell'unità 1. 


FILES "0:V???" MSM 


viene visualizzato il nome di tutti i file 
che risiedono sul dischetto inserito nell'unità 
0 e che soddisfano alle seguenti condizioni: 

- il nome inizia con la lettera 'V 

- il nome é composto da quattro caratteri 
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4. I DATI 



SOMMARIO 

In questo capitolo prenderemo in considerazione come il linguaggio BASIC 
tratta i dati. Esamineremo le costanti e le variabili, la rappresentazio- 
ne dei numeri, le conversioni numeriche e le matrici. 



INDICE 



COSTANTI E VARIABILI 



4-1 
4-1 
4-1 
4-1 



COSTANTI 
VARIABILI 

NOMI OELLE VARIABILI 

RAPPRESENTA2 I0NE DEI NUMERI 4-2 

RAPPRESENTAZIONE BINARIA 4-2 

RAPPRESENTAZIONE ESADECIMALE 4-5 
E OTTALE 

CLASSIFICAZIONE DELLE 4-6 
COSTANTI 

DATI NUMERICI 4-6 

DATI STRINGA 4-7 

DETERMINAZIONE DEL TIPO 4-8 
DI UNA COSTANTE 

CARATTERI DI DICHIARAZIONE 4-9 
TIPO 



CL ASSIFICAZIONE DELLE 4-10 
VARIABILI 

DEFINT/DEFSNG/DEFDBL/DEFSTR 4-10 
(PROGRAMMA/IMMEDIATO) 



CARATTERI DI DICHIARA- 4-11 
Z10NE DI TIPO 

CONVERSIONI NUMERICHE 4-12 

DA PRECISIONE SEMPLICE 4-13 
0 DOPPIA A INTERO 

DA INTERO A PRECISIONE 4-14 
SEMPLICE 0 DOPPIA 

DA SEMPLICE A DOPPIA 4-14 
PRECISIONE 

DA DOPPIA A SEMPLICE 4-16 
PRECISIONE 

CONVERSIONI ILLECITE 4-17 

VARIABILI CON INDICE 4-17 
E MATRICI 



MATRICI A UNA DIMENSIONE 4-18 

MATRICI A PIÙ' DIMENSIONI 4-18 

D1M (PROGRAMMA/IMMEDIATO) 4-19 

ERASE (PROGRAMMA/IMMEDIATO) 4-23 

OPTION BASE 4-24 
(PROGRAMMA/IMMEDIATO) 



I DATI 



COSTANTI E VARIABILI 

1 dati che un programma BASIC può prendere in considerazione, possono 
essere delle costanti o delle variabili. 



COSTANTI 

Se in un'istruzione BASIC compare un numero (ad es. 15, -2, 3.41 ecc.), o 
una stringa di caratteri (ad es. "AAA.bl", "Cursor***") , questo numero o 
questa stringa sono considerati costanti. Ciò significa che i loro valori 
non variano durante l'esecuzione del programma. 

VARIABILI 

Una variabile è un dato al quale è stato associato un nome. Il valore del 
dato può quindi cambiare durante l'esecuzione del programma. 

Per es., la formula che calcola l'area di un cerchio: 

3.141592*R A2 

utilizza la variabile R, che rappresenta qualsiasi valore del raggio, e 
riserva una posizione di memoria per questo valore. 

Nota: Il simbolo A è un operatore che indica che R deve essere elevato 
alla potenza specificata (nel nostro caso 2). 



NOMI DELLE VARIABILI 

L'identificatore (o nome) di una variabile non può essere più lungo di 40 
caratteri. 1 caratteri ammessi possono essere lettere e numeri. 11 punto 
(.) è pure ammesso. 11 primo carattere deve essere una lettera, e 
l'ultimo può essere sia una lettera, sia un numero, sia un punto, sia un 
carattere di dichiarazione di tipo (%,!,#,$). 11 significato di un 
carattere di dichiarazione di tipo verrà spiegato più avanti in questo 
stesso capitolo. 

Le lettere minuscole, eventualmente presenti in un identificatore di 
variabile, sono considerate equivalenti alle corrispondenti lettere 
maiuscole e vengono convertite in lettere maiuscole quando si lista il 
programma. 

Esempi di nome di variabile sono: 

STUDENTE A1 CC01 . CLASSE ACCONTO* A$ STRINGA. 
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Parole Riservate 



Una parola riservata (una parola chiave, il nome di un comando o di una 
funzione) non può essere usata come identificatore di una variabile, ma 
il BASIC consente di inserire parole riservate all'interno, all'inizio o 
alla fine di un identificatore di variabile. Per es. : 

10 PERFORMACE = 105.3 
20 SINGLE = 1371.2 

sono linee di programma corrette, anche se PERFORMANCE contiene la parola 
chiave FOR, e SINGLE inizia con il nome della funzione SIN. 



RAPP RE SENTAZ I ONE DEI NUMERI 

L'uomo é abituato a pensare i numeri in base 10 (rappresentazione 
decimale). Un computer considera invece i numeri come stringhe di bit 
(dove ogni bit può avere il valore 0 oppure 1), ed esegue la maggior 
parte delle sue operazioni trattando i numeri in base 2 (rappresentazione 
binaria) . 

Questo paragrafo traccia una panoramica dei concetti di base della 
rappresentazione dei numeri in base 2, in base 16 e in base 8. 

RAPPRESENTAZIONE BINARIA 

Prima di parlare della rappresentazione binaria, esaminiamo brevemente la 
struttura della rappresentazione decimale. La rappresentazione decimale 
usa le cifre 0,1 ,2,... 9. Ad esempio, prendiamo in considerazione il 
numero: 

205 

Vediamo che le sue cifre hanno un valore di posizione associato alla 
potenza del 10. Infatti questo numero può essere pensato come: 

(2 x 10 2 ) + (0 x 10 1 ) + (5 x 10 0 ) 



11 concetto di valore di posizione 
binaria. L'unica differenza é che 
potenze del 2, anziché quelle del 10. 



esiste anche nella rappresentazione 
vengono prese in considerazione le 
11 numero 205 in base 2 é: 
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11001101 

Si noti che in base 2, le cifre ammesse sono soltanto "1" e "0". Quindi 
la predetta rappresentazione binaria significa: 

(1 X 2 7 ) + (1 x 2 6 ) + (0 x 2 5 ) + (0 x 2 4 ) tifi 2 3 ) + (1 x 2 2 ) + 
(0 x 2 1 ) + (1 x 2 0 ) 
cioè : 

128+64+8+4+1 =205 

Una cifra binaria viene denominata bit. Un bit può essere "1" o "0". 
Byte 



Le stringhe di bit vengono solitamente suddivise in gruppi di 8 bit. Un 
gruppo di 8 bit, considerato come una singola unità di informazione, 
viene denominata "byte". 

1 bit di un byte sono numerati da 0 (il primo a destra, cioè il meno 
significativo) a 7 (il primo a sinistra, cioè il più significativo). 

In base a questa convenzione, il numero del bit e la potenza del 2 che 
rappresenta sono identici. La seguente tabella fa vedere il numero di 
posizione di un bit nell'ambito del byte e il suo valore corrispondente. 



NUMERO DI POSIZIONE 


BIT 

7 


BIT 
6 


BIT 
5 


BIT 
4 


BIT 

3 


BIT 

2 


BIT 

1 


BIT 
0 


Significato 


2 7 


2 6 




2 4 


2 3 


2 2 


2 1 


2* 


Valore 


128 


64 


32 


16 


8 


4 


2 


1 



Tabella 4 - 1 





BASE 10 


BASE 2 




0 

12 




0 

1100 






27 




11011 






149 




1001 3101 






255 




11111111 





Tabella 4-2 Esempi di conversione 



4-3 



Uord 



L'M20 elabora 16 bit (2byte) per volta. Questa quantità é detta "word". 
11 numero di bit in una word può variare da macchina a macchina. 1 bit 
di una word sono numerati da 0 (quello più a destra, cioè il meno signi- 
ficativo) a 15 (quello più a sinistra, cioè il più significativo). 

Un'altra caratteristica di una word nel sistema M20 è che viene usata 
la rappresentazione "completamento a due". Questa rappresentazione con- 



sente di memorizzare in una word sia numeri positivi che negativi: 
SE un numero intero é,. ALLORA E la word è ... 


positivo 


il bit 15 è 0 


un numero positivo 
rappresentato in bina- 
rio 


negativo 


il bit 15 è 1 


un numero negativo 
rappresentato in "com- 
pletamento a due". 



Per trovare il valore assoluto di un numero negativo, bisogna invertire 
tutti i suoi bit e aggiungere 1. 

Per esempio' 



1111100110011000 


valore 


originario (negativo) 




Invertendo tutti i bit 


0000011001100111 


valore 


invertito 


I 


Aggiungendo 1 


0000011001101000 


Valore 


assoluto (valore invertito + 1) 





Sicché il valore della configurazione di bit sopra specificata è: 
-1640 
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RAPPRESENTAZIONE ESADECIMALE E OTTALE 

Abbiamo visto che è possibile rappresentare: numeri in base 10 (rappre- 
sentazione decimale) e in base 2 (rappresentazione binaria). IL BASIC 
permette anche di rappresentare: numeri in base 8 (rappresentazione 
ottale) e in base 16 (rappresentazione esadecimale) . 

Sebbene sia spesso conveniente trattare i numeri in base 2, è difficile 
per l'utente scriverli e leggerli in questa rappresentazione. Per questa 
ragione l'utente preferisce convertirli in base otto o in base sedici. 

- Base 8, conosciuta come "rappresentazione ottale", usa una cifra ottale 
per tre cifre binarie 

- Base 16, conosciuta come "rappresentazione esadecimale", usa una cifra 
esadecimale per 4 cifre binarie. 

La seguente tabella illustra la rappresentazione in base 10 (decimale), 
in base 2 (binaria), in base 8 (ottale), e in base 16 (esadecimale) dei 
numeri da 0 a 16. 



DECIMALE 


BINARIA 


OTTALE 


DECIMALE 


BÌNASIA 


ESADECIMALE 


0 

1 


000 
001 


0 

1 


0 
1 


0000 
0001 


0 

1 


2 


010 


2 


2 


0010 


2 


3 


011 


3 


3 


0011 


3 


4 


100 


4 


4 


0100 


4 


5 


101 


5 


5 


0101 


5 


6 


110 


6 


6 


0110 


6 


7 


111 


7 


7 


0111 


7 


8 


1000 


10 


8 


1000 


8 


9 


1001 


11 


9 


1001 


9 


10 


1010 


12 


10 


1010 


A 


11 


1011 


13 


11 


1011 


B 


12 


1100 


14 


12 


1100 


C 


13 


1101 


15 


13 


1101 


D 


14 


1110 


16 


14 


1110 


E 


15 


1111 


17 


15 


1111 


F 


16 


10000 


20 


„ 


10000 


10 



Tabella 4-3 
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CLASSIFICAZIONE DELLE COSTANTI 

11 modo in cui il BASIC memorizza un dato determina: 

- lo spazio in memoria che il dato occupa (in byte) 

- la velocità con cui il BASIC elabora il dato. 



DATI NUMERICI 

L'utente può far si che il BASIC memorizzi i numeri del proprio programma 
come : 

- numeri interi (massima velocità di elaborazione ma limitato campo di 
definizione) 

- numeri in semplice precisione (di uso generale) 

- numeri in doppia precisione (massima precisione ma elaborazione più 
lenta). 





NUMERI 
INTERI 


NUMERI IN 

SEMPLICE 

PRECISIONE 


NUMERI IN 

DOPPIA 

PRECISIONE 


Spazio in 
memoria 
(in byte) 


2 


4 


8 


Campo di 
definizione 


Da -32768 
a 32767 


Da ± W~ 3B 
a ± 1<J 38 


Da + 10 -M>8 
a * 10 3 * 8 


Cifre signi- 
ficative 


Massimo 5 


Massimo 7 


Massimo 16 


Cifre visua- 
lizzate 
(PR1NT/LPR1NT) 


Massimo 5 


Massimo 6 
(con arroton- 
damento) 


Massimo 15 
(con ar- 
rotonda- 
mento) 



Tabella 4-4 
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LINGUAGGIO BASIC - MANUALE GENERALE 



I DATI 



Nota : Gli zeri non significativi non vengono visualizzati. Per esempio il 
valore 3.410000 in semplice precisione verrà visualizzato come 3.41. 



DATI STRINGA 

Le stringhe (sequenze di caratteri ASCII) sono utilizzate per memorizzare 
informazioni non numeriche, come nomi, indirizzi, codici, ecc. Per esempio 
la costante: 

"FORD .RENAULT" 

è una costante stringa di 13 caratteri. Ogni carattere della stringa 
(compreso lo spazio) è memorizzato in un byte e corrisponde a un codice 
della tabella ASCII. 11 BASIC memorizza la suddetta costante stringa come 
segue: 



Carattere 
ASCII 


FORD .RENAULT 


Codice 
Esadecinale 


46 4F 52 44 20 2C 52 45 4E 41 55 4C 54 



Tabella 4-5 



La lunghezza massima di una stringa è di 255 caratteri. Una stringa con 
lunghezza zero è detta stringa "nulla", ed è rappresentata da una coppia 
di virgolette (""). 11 BASIC memorizza le stringhe in modo dinamico, cioè 
lo spazio in memoria riservato ad una stringa può variare durante 
l'esecuzione del programma da 0 a 255 byte. 





STRINGA NULLA 


STRINGA DI 
n CARATTERI 


STRINGA DI MAS- 
SIMA LUNGHEZZA 


Spazio in memoria 
(in byte) 


0 


n 


255 


Campo di 
definizione 




Qualsiasi stringa di caratteri stam- 
pabili ASCII, spazio compreso 



Tabella 4-6 
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DETERMINAZIONE DEL TIPO 01 UNA COSTANTE 



SE... 


ALLORA... 


ESEMPI 


il valore è compre- 


è una stringa 


"NO" 


so tra due virgolette 




"YES" 
"Circle" 

""(stringa nulla) 


il valore non è 


è un numero 


521 


rininrpcfi fra Hi io 
i^Ullipi CjU LI a UUc 

virgolette 


Nota: Un'eccezione a 
ouesta reaola si ha 


3.7345E-2 
43 # 




\|uqi iuu i uuei aiu 




re introduce un dato 






in risposta a una 






istruzione di INPUT o 






LINE INPUT, e nelle 






istruzioni DATA 




un numero è intero 


è una costante 


1024 


ed è compreso tra 


intera 


721 


-32768 e 32767 




-32768 


il valore ha il 


è una costante 


&H20F0 


prefisso SH, ed è 


esadecimale 


&HF1 


composto dai nume- 
ri da 0 a 9 e dalle 
lettere da A a F 
(compreso tra 0 e 
FFFF) 


Nota: una costante 
esadecimale può 
esserp con^idprflta 
come una rappre - 


&HFE98 
SHFFFF 
SH0 


sentazione alterna- 
tiva della corri - 
spondente costante 
intera 




il valore ha il 


è una costante 


&O70 


prefisso &0 o & ed 


otta le 


&044 


è composto dai nu- 
meri da 0 a 7 (com- 
preso tra 0 e 177777) 


Nota: una costante 
ottale può essere 
considerata una 
rappresentazione 
alternativa della 
corrispondente co- 
stante intera 


&71175 
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LINGUAGGIO BASIC - MANUALE GENERALE 



I DATI 



un numero non è un 

MUDICI Vj 1 1 1 LC 1 U C 1 IUI 1 

contiene più di 
7 cifre 


è una costante in 

jClilp 1 1 Lt L'I CL 1 3 lUMC 


-2.3 

OC 1 DO 

45.314 
-65000 


un numero contie- 
ne più di 7 cifre 


è una costante in 
doppia precisione 


52174593 

-54.397124 

8.799999999 


CARATTERI DI DICHIARAZIONE TIPO 

L'utente può forzare il tipo di una costante aggiungendo, alla fine di 
una costante numerica i seguenti caratteri di dichiarazione: 


CARATTERI DI 
DICHIARAZIONE 


SIGNIFICATO 


ESEMPI 




dichiara un numero 
in semplice preci- 
sione 


5.72110333! 

la costante è in sem- 
plice precisione e solo 
le prime 7 cifre (per 
es. 5.721103) vengono 
memorizzate. 


E 


semplice precisione 
"floating point". E 
indica che la costan- 
te deve essere 
moltiplicata per una 
potenza del 10, in- 
dicata dopo la E 


7.31E4 significa 
4 

7.31 x 10 cioè 
73100 


# 


dichiara un numero 
in doppia precisione 


4# 

5.21# 


D 


doppia precisione 
"floating point". D 
indica che la costan- 
te deve essere molti- 
plicata per una 
potenza del 10, in- 
dicata dopo la D 


7.2D-3 significa 

7.2 x 10" 3 cioè 
0.0072 
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CLASSIFICA ZI ONE DELLE VARIABILI 



Ogni identificatore di variabile che appare in un programma viene 
classificato dal BASIC o come una stringa, o come un numero intero, o 
come un numero in semplice o doppia precisione. 

Se non viene specificato altrimenti, il BASIC classifica tutte le 
variabili numeriche in semplice precisione. Per esempio, se questa è la 
prima linea del nostro programma: 

10 X1=3.5 

11 BASIC classifica X1 come una variabile in semplice precisione. 

Tuttavia, l'utente può attribuire tipi diversi alle variabili sia usando 
istruzioni di definizione di tipo sia scrivendo un carattere particolare, 
atto a dichiarare il tipo, alla fine dell'identificatore di variabile. 



DEF INT/DEFSNG/DEFDBL/DEFSTR (PROGRAMMA/IMMEDIATO) 

Esistono in BASIC quattro istruzioni di definizione di tipo. 

Un'istruzione di definizione di tipo dichiara il tipo di tutte le 
variabili il cui nome inizia con una lettera ben specificata. 

Queste istruzioni vengono inserite di solito all'inizio del programma e 
devono precedere l'uso delle variabili di cui definiscono il tipo. 




Figura 4-1 Istruzioni di Definizione di Tipo 
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LINGUAGGIO BASIC - MANUALE GENERALE 



I DATI 



Valori di Default 

Se non specificato altrimenti, tutte le variabili vengono assunte in 
semplice precisione. 

Esempi 



SE l'utente imposta... 


ALLORA. .. 


10 DEF1NT A-Z EHM 


tutte le variabili del programma saranno numeri 
interi 


10 DEFDBL D Iti 


tutte le variabili del programma che iniziano 
con la lettera D saranno in doppia precisione 


10 OEFSTR S.U-W I&l 


tutte le variabili del programma che iniziano 
con le lettere S, U, V e W saranno variabili 



stringa 



CARATTERI DI DICHIARAZIONE DI TIPO 

Come già abbiamo visto per le costanti, l'utente può forzare il tipo di 
una variabile aggiungendo alla fine del nome un carattere di dichiara- 
zione. Per le variabili abbiamo quattro caratteri di dichiarazione di 
tipo: 



CARATTERE DI 
DICHIARAZIONE 


SIGNIFICATO 




ESEMPI 


% 


variabile intera 




A% 

STEP% 

INCREMENT% 

sono tutte variabili 
intere, indipendente- 
mente da eventuali i- 
struzioni di defi- 
nizione di tipo per le 
variabili che iniziano 
con A, Se 1 . 
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variabile in semplice 
preci sione 



variabile in doppia 
precisione 



variabile stringa 



SPEED! 
SPACE! 
TIME ! 

sono tutte variabili in 
semplice precisione, 
indipendentemente da 
eventuali istruzioni di 
definizione di tipo per 
le variabili che ini- 
ziano con le lettere S 
e T. 



TOTAL* 

SUBTOTAL* 

XI* 

sono tutte variabili in 
doppia precisione, in- 
dipendentemente da 
eventuali istruzioni di 
definizione di tipo per 
le variabili che ini- 
ziano con le lettere T, 
SeX. 



AS 
BIS 

NAME.CLASSS 

sono tutte variabili 
stringa, indipen- 
dentemente da eventuali 
istruzioni di tipo per 
le variabili che ini- 
ziano con le lettere A, 
B e N. 



CONVERSIONI NUMERICHE 

Spesso in un programma o in una linea ad esecuzione immediata si assegna 
una costante di un certo tipo ad una variabile di tipo diverso. 
Per esempio, se si imposta: 

1% = 5.31 H:l 
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LINGUAGGIO BASIC - MANUALE GENERALE 



1 DATI 



il BASIC arrotonderà per prima cosa la costante 5.31 ( in semplice 
precisione) all'intero più vicino. Questo numero verrà poi assegnato alla 
variabile intera 1%. Perciò il valore della variabile 1% sarà 5. 

Si può anche assegnare a una variabile di un certo tipo una variabile di 
tipo diverso, come ad esempio: 

SCALE! = B°i. Iti 

SECONDS ! = C1# MUm 

bok# » u% w*m 

Le procedure di conversione sono elencate nelle pagine seguenti. 
DA PRECISIONE SEMPLICE 0 DOPPIA A INTERO 

11 BASIC converte il valore in semplice o doppia precisione a un intero 
arrotondando la parte frazionaria. 

Nota : 11 valore ottenuto deve essere maggiore o uguale a -32763, 
e minore di 32767, altrimenti si ha un errore di Overflow. 

Esempi 



VIDEO 


COMMENTI 


C% = -15.1 

Ok 

?C% 

-15 

Ok 


il valore -15 è assegnato alla variabile C% 


C% = 4.1E2 
Ok 
?C% 
410 
Ok 


il valore 410 è assegnato alla variabile C% 


C% = 47.8 
Ok 
?C% 
48 
Ok 


il valore 48 è assegnato alla variabile C% 
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ii valore p e assegnato alia variaDiie v,* 


fife 




?c% 




0 
Ok 




C% = -32768.5 


errore di Overflow 


Overf low 




Ok 





DA INTERO A PRECISIONE SEMPLICE 0 DOPPIA 

In questo caso la conversione non comporta errori, e il valore convertito 
corrisponde al valore originario esteso con zeri alla destra del punto 
decimale. 



VIDEO 



COMMENTI 



S! = 
Ok 
?S! 
326 
Ok 



326 



il numero 326 è memorizzato nella variabile S! 
come 326.0000, ra visualizzato come 326. 



D# = 326 
Ok 
?D# 
326 
Ok 



il numero 326 è memorizzato nella variabile Ott 
come 326.0000000000000; ma viene visualizzato 
come 326. 



DA SEMPLICE A DOPPIA PRECISIONE 

11 BASIC aggiunge degli zeri alla fine di un numero in semplice precisione. 
Se il valore originario: 

- ha una rappresentazione binaria esatta, la conversione non comporta 
errori 

- non ha una rappresentazione binaria esatta, un errore aritmetico viene 
introdotto al momento della conversione. 
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LINGUAGGIO BASIC - MANUALE GENERALE 



1 DATI 



Esempi 



VIDEO 


COMMENTI 


B# = 1 .5 
Ok 
?B« 
1.5 
Ok 


Quando si introduce B# =1 .5, viene assegnato 
il valore 1.500000000000000 alla variabile B" , 
ma questo valore è visualizzato soltanto come 
1 .5 

Nota: 1.5 ha una rappresentazione binaria esatta 


C# = 1.3 
Ok 

?C# 

1.29999995231628 
Ok 


Quando si introduce C# = 1.3, viene assegnato 
il valore 1.299999952316280 alla variabile C# , 
ma questo valore è visualizzato soltanto come 
1 .29999995231628 

Nota: 1.3 non ha una rappresentazione binaria 




esatta. 


Note 




Per evitare una perdita di precisione nei calcoli è buona norma di 
programmazione evitare ove possibile conversioni da semplice a doppia 
precisione nei programmi BASIC. 



Ad esempio, se si vuole assegnare un valore costante a una variabile in 
doppia precisione, conviene usare una costante in doppia precisione. 
Per esempio: 

B#= 1.3# 1.3D 

memorizzano entrambe 1.3 nella variabile B#. 



Quando il valore in singola precisione è memorizzato in una variabile, è 
allora necessario (per evitare una perdita di precisione) convertire 
prima la variabile in semplice precisione a un valore stringa con la 
funzione STR$ (vedi Capitolo 9) e quindi convertire di nuovo la stringa 
risultante in un numero con la funzione VAL (vedi Capitolo 9). 
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VIOEO 


COMMENTI 


LIST 


Questo programma visualizza 


il 


10 B!=1.3 


valore di B# con una perdita 


di 


20 B# =8! 


o ree i si one 




30 PRINT 8# 






Ok 






RUN 






1 .2^999995231628 






Gk 






LIST 


Questo programma visualizza 


il 


10 8! =1.3 


valore di B# senza perdite 


di 


20 B# =VAL(STR$(B!>> 


precisione 




30 PRINT B# 






Ok 






RUN 






1.3 







DA DOPPIA A SEMPLICE PRECISIONE 

Questa operazione consiste nel convertire un numero che ha al massimo 16 
cifre significative in un numero che non ne ha più di 7. 

Saranno prese in considerazione soltanto le prime sette cifre del valore 
originario con arrotondamento dell'ultima cifra. 

Prima di visualizzare o stampare tale numero il BASIC lo riduce, sempre 
con arrotondamento a 6 cifre. 

Nota : Se il valore in doppia precisione è fuori dal campo di definizione 
dei valori in semplice precisione, si ha un errore di Overflow. 



Esempio 



VIDEO 


COMMENTI 


P! = 


2.03999996 


il valore 2.040000 viene assegnato 


Ok 




alla variabile P!, ma questo valore 


?P! 




viene visualizzato soltanto come 


2.0 


1 


2.04 


Ok 







4-16 



LINGUAGGIO BASIC - MANUALE GENERALE 



I DATI 



CONVERSIONI ILLECITE 

L'utente non può convertire valori numerici in valori stringa, o 
viceversa, mediante un'istruzione di assegnazione. Per esempio: 

CS = 321.7 

è una conversione che non è ammessa. (In questi casi le funzioni STRS e 
VAL permettono di realizzare queste conversioni. Vedere Capitolo 9). 



VARIABILI CON INDICE E MATRICI 

Come predetto (Vedere Capitolo 1) una variabile può essere una "variabile 
semplice" oppure una "variabile con indice", cioè un elemento di 
"matrice" ("array"). 

Una "matrice" è un insieme di variabili dello stesso tipo, aventi tutte 

10 stesso nome ma distinguibili tramite il valore di uno o più indici 
indicati tra parentesi dopo il nome. Ad esempio, se A è il nome di una 
matrice a una dimensione, A(0) è il suo primo elemento, A(1) il secondo 
ecc. (supponendo che il valore minimo degli indici sia 0). 

11 valore di un indice deve essere un intero positivo, ma è possibile 
usare un'espressione numerica per esprimere il valore di un indice. Se il 
valore dell'espressione non fosse intero viene arrotondato automatica- 
mente all'intero più vicino. 

Una matrice può avere un numero qualsiasi di dimensioni. Una matrice a 
una dimensione può essere pensata come una lista di dati. Può avere più 
righe, ma una sola colonna. Una matrice a due dimensioni può essere 
passata come una tabella di dati. Può avere più righe e più colonne. 

Per definire una matrice, l'utente deve: 

- attribuire un nome alla matrice (le stesse regole specificate per i 
nomi delle variabili semplici, sono anche valide per i nomi delle 
matrici) 

- stabilire il valore massimo e il valore minimo degli indici. 

Per fare ciò, l'utente deve scrivere un'istruzione D1M ed eventualmente 
un'istruzione 0PT10N BASE. Se l'utente specifica nel suo programma: 

10 OPTION BASE 1 

11 valore minimo degli indici di tutte le matrici è 1. 
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Se, invece, nel programma non è presente alcuna istruzione OPTION BASE (o 
se è presente l'istruzione OPTION BASE 0), il valore minimo degli indici 
di tutte le matrici è 0. 

E' anche possibile ridefinire una matrice tramite una nuova istruzione 
OIM, preceduta da una istruzione ERASE (che verrà spiegata in dettaglio 
nel seguito). 

MATRICI A UNA DIMENSIONE 

Supponiamo di avere la seguente lista di numeri: 
17, -9, 32, 105, -48 

Se definiamo una matrice numerica a una dimensione V, possiamo memorizza- 
re tutti i valori della lista come elementi di questa matrice e possiamo 
accedere a ciascun elemento tramite il valore del suo indice. 



Matrice V 



Elemento 


Contenuto 






V(0) 


17 




Ogni elemento della matrice V 


è individuato dal 


V(1) 


-9 




suo indice. Per esempio, il 


valore di V(1) è 


V(2) 


32 




-9, e il valore di V(3) 


è 105. L'indice 


V(3) 


105 




identifica la posizione dell 


'elemento all'in- 


VC4) 


-48 




terno della matrice. 





MATRICI A PIÙ" DIMENSIONI 

Possiamo definire una matrice a due dimensioni per memorizzare i valori 
di una tabella. Supponiamo di avere la seguente tabella: 



NOME 


CODICE 


NAZIONE 


SESSO 


Anna 


21SAA 


Gran Bretagna 


F 


Giovanni 


35ECK 


USA 


M 


Riccardo 


70UST 


Svezia 


M 



Tabella 4-7 
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I DATI 



Questa tabella comprende 3 righe e 4 colonne per un totale di 12 valori 
stringa. 

Se definiamo una matrice stringa AS, possiamo memorizzare tutti i valori 
della tabella come elementi di questa matrice e possiamo accedere a 
ciascun elemento tramite il valore dei suoi due indici. 



INDICE 


0 


1 


2 


3 


0 


Anna 


215AA 


Gran Bretagna 


F 


1 


Giovanni 


35ECR 


USA 


M 


2 


Riccardo 


70UST 


Svezia 


M 



Tabella 4-8 Matrice AS 



Ogni elemento della matrice A$ è individuato da due indici, racchiusi 
tra parentesi dopo il nome della matrice e separati da una virgola. 

11 primo indice rappresenta la riga e il secondo la colonna. Per esempio 
il valore di A$(0,1) è la stringa 21SAA, e il valore di A$(2,3) è il 
carattere M. 

E' anche possibile definire matrici con più di due dimensioni, ma queste 
sono usate molto di rado. 




D1M (PROGRAMMA/IMMEDIATO) 



Specifica il nome di una matrice, il numero delle sue dimensioni e il 
valore massimo dell'indice per ogni dimensione. L'istruzione D1M può 
specificare una o più matrici. 




l o 

Figura 4-2 Istruzione D1M 



4-1V 



Dove 



ELEMENTO DI SINTASSI 
array 



upper bound 



SIGNIFICATO 

è il nome di una 
matrice (qualsiasi 
nome di variabile 
è consentito) 

è una qualsiasi co- 
stante numerica po- 
sitiva o una varia- 
bile numerica con 
valore positivo. Se 
questo valore non è 
intero viene arro- 
tondato all'intero 
più vicino. 



VALORI DI DEFAULT 



se non è presente alcu- 
na istruzione D1M, il 
valore massimo dell'in- 
dice per ogni dimensio- 
ne viene assunto pari a 
10, e il numero di 
dimensioni viene stabi- 
lito non appena si 
incontra un elemento 
della matrice nel pro- 
gramma. 



Esempio 



SE l'utente imposta... ALLORA... 

10 DIM A(5), 8$(20,30) B3I definisce una matrice A a una dimensione 

con l'indice compreso tra 0 e 5, e una 
matrice stringa a due dimensioni B$ con 
l'indice di riga compreso tra 0 e 20 e 
l'indice di colonna tra 0 e 30. 

Nota : A è una matrice numerica a meno che 
un'istruzione DEFSTR stabilisca altrimenti. 



Numero di Dimensioni 

In BASIC è possibile definire matrici con numero arbitrario di dimensioni 
(compatibilmente con la memoria disponibile), ma le matrici di uso più 
frequente hanno soltanto una o due dimensioni. 

Se l'utente non introduce alcuna istruzione DIM nel programma, la matrice 
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I DATI 



viene creata quando il BASIC incontra per la prima volta un suo elemento. 
In base al numero degli indici il BASIC può determinare il numero delle 
dimensioni. Per esempio, se in una istruzione compare: 

AR1 (3,5,10) 

allora il BASIC crea la matrice ARI con tre dimensioni, e con un valore 
massimo dell'indice per ogni dimensione pari a 10. 



Numero di Elementi per Dimensione 



SE. .. 


| E SE... 


ALLORA. . . 


nessuna istruzione 
D1M è presente 


viene specificato 
OPTION BASE 0 


si hanno 11 elementi 
per ogni dimensione 
(indici tra 0 e 10) 




viene specificato 
OPTION BASE 1 


si hanno 10 elementi 
per ogni dimensione 
(indici tra 1 e 10) 


è presente una 
istruzione 01M 


viene specificato 
OPTION BASE 0 


il numero di elementi 
per ogni dimensione è 
pari al valore massimo 
dell 1 indice + 1 




viene specificato 
OPTION BASE 1 


il numero di elementi 
per ogni dimensione è 
pari al valore dell'in- 
dice. 
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Definizione di una Matrice 



1 

L'UTENTE DEVE 


'- 


OPPURE... 


stabilire il valore 
minimo degli indici 


può utilizzare l'i- 
struzione 0PT10N BASE 1 


può adottare il valore 
di default 0PT10N BASE 

r 


assegnare un nome 
alla matrice 


può utilizzare 1 ' i- 
struzione 01M 


può far riferimento a 
un elemento della ma- 
trice nel programma. 

Nota: In questo caso il 
valore massimo dell'in- 
dice per ogni dimensio- 
ne risulta pari a 10. 


stabilire il nume- 
ro di dimensioni 




stabilire il valore 
massimo dell'indice 
per ogni dimensione 





Note 

- Una istruzione D1M inizializza a zero tutti gli elementi delle matrici 
specificate. 

- Una istruzione D1M deve precedere ogni riferimento ad elementi di 
matrice. 

- Una istruzione D1M non può stabilire il valore massimo dell'indice per 
dimensione, se il controllo dell'esecuzione salta le D1M. 

Esempio 



VIDEO 



COMMENTI 



LIST 

10 1=1 

20 GOTO 40 

30 D1M A(50) 

40 A(10)=3 

50 A(11)=45 

Ok 

RUN 

Subscript out of range 
Ok 



L'M20 visualizzerà il messaggio d'errore: 

Subscript out of range in 50 

quando viene eseguita l'istruzione 50, dato 
che l'istruzione 30 è stata saltata e il 
valore massimo dell'indice viene assunto 
pari a 10. 



50 
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E RASE ( PROGRAMMA / IMMEDIATO ) 



Libera lo spazio riservato a una o più matrici e rende disponibili i 
relativi nomi per nominare altre variabili del programma. 




Figura 4-3 Istruzione ERASE 



Esempio 



VIDEO 


COMMENTI 


10 DIM A(15,15),B(10,20) 

100 ERASE A,B 

110 DIM A(100),B(2,2,2) 


dopo aver eseguito l'istruzione 100, lo spazio 
allocato per le matrici A e B viene rilascia- 
to. L'utente può allora definire altre varia- 
bili (in particolare matrici) con quegli 
stessi nomi: qui l'istruzione 110 definisce 
altre due matrici A e B con un diverso numero 
di dimensioni e con un diverso valore massimo 
degli indici. 


Note 



Di norme non è consigliabile riutilizzare un identificatore per altri 
scopi perchè può essere fonte di errori o può rendere il programma poco 
leggibile. 

Tuttavia il ridimensionamento di matrici può risultare, molto utile, ad 
esempio quando il nome di una matrice viene utilizzato da una subroutine 
e si vogliono passare a questa subroutine matrici con un diverso numero 
di dimensioni (o un diverso valore massimo degli indici). 
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0PT10N BASE (PROGRAMMA/IMMEDIATO) 

Dichiara il valore minimo degli indici delle matrici. 




Figura 4-4 Istruzione OPTION BASE 



Valori di Oefault 



Se l'utente non scrive una istruzione OPTION BASE nel proprio programma, 
per default viene assunto OPTION BA5E 0; pertanto il valore minino degli 
indici delle matrici è per default 0. 



Esempio 



SE l'utente imposta... 


ALLORA... 


10 OPTION BASE 1 Hi 


il valore minimo degli indici è 1. 


OPPURE 




OPTION BASE 1 PI 
(in modo immediato) 




Note 



L'istruzione OPTION BASE 1 può essere utile soprattutto per convertire 
verso l'M20 programmi BASIC scritti per essere eseguiti su altri sistemi. 
Alcune versioni del linguaggio BASIC infatti accettano come valore minimo 
degli indici soltanto il valore 1 . 

L'istruzione OPTION BASE non può essere preceduta da un'istruzione DIM o 
da un riferimento a un elemento di matrice. 
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SOMMARIO 

Questo capitolo si propone di descrivere alcune modalità con le quali 
vengono forniti in BASIC i dati al computer. 

Verranno prese in esame: 

- le istruzioni CLEAR, LET e SUAP 

- le istruzioni INPUT e LINE INPUT 

- le istruzioni DATA, READ e RESTORE 

Altre modalità di introduzione dei dati (che comportano l'utilizzazione 
dei file esterni) saranno esaminate successivamente (vedere il Capitolo 
12). 

INDICE 

ISTRUZIONI DI ASSEGNAZIONE 5-1 

CLEAR (PROGRAMMA/IMMEDIATO) 5-1 

LET (PROGRAMMA/IMMEDIATO) 5-3 

SWAP (PROGRAMMA/IMMEDIATO) 5-5 

IL FILE DATI INTERNO 5-6 

DATA/RE AO/RESTORE (PROGRAMMA) 5-6 

ISTRUZIONI DI INPUT 5-9 

INPUT (PROGRAMMA) 5-10 

LINE INPUT (PROGRAMMA) 5-14 
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IST RUZIONI DI ASSEGNAZIONE 

In BASIC vi sono tre istruzioni di assegnazione: 

- l'istruzione CLEAR che consente di azzerare le variabili numeriche e 
di inizializzare le variabili stringa al valore stringa nulla. 

- l'istruzione LET, che consente di assegnare il valore di una espres- 
sione ad una variabile. La variabile e l'espressione devono essere 
dello stesso tipo (entrambe numeriche o entrambe stringa). 

- l'istruzione SWAP, che consente di scambiare i valori di due varia- 
bili, purché siano dello stesso tipo (intera, in semplice precisione, 
in doppia precisione, stringa). 

Le istruzioni LET e SWAP vengono spesso utilizzate per eseguire calcoli 
immediati . 

CLEAR (PROGRAMMA/IMMEDIATO) 

Azzera tutte le variabili numeriche, inizializza le variabili stringa al 
valore stringa nulla, chiude tutti i file dati e tutte le finestre (v. 
capitolo 14) e azzera il video. E' anche possibile, con l'istruzione 
CLEAR, stabilire lo spazio di memoria dedicato al BASIC e quello 
dedicato allo stack. 




Figura 5-1 Istruzione CLEAR 



Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


memory 


rappresenta l'ammontare di memoria (in byte) 
disponibile per i programmi BASIC. 

La memoria, utilizzabile dal BASIC, può anche 
essere stabilita con il comando SBASIC del PCOS. 

Se il parametro memory viene omesso, il suo 
valore è quello stabilito con il comando S8AS1C 
oppure 36800 byte (come seconda alternativa) 


stack 


stabilisce lo spazio, dedicato allo stack. 

jll valore di default è il valore minore tra 512 
byte e 1/8 della memoria disponibile. 

Lo stack è una parte della memoria dedicata al 
BASIC, utilizzata per memorizzare l'indirizzo di 
ritorno dei sottoprogrammi, delle funzioni ecc. 



Esempi 



VIDEO 



CLEAR 



COMMENTI 



azzera le variabili numeriche, inizializza le 
variabili stringa al valore stringa nulla, 
chiude i file dati e le finestre e azzera il 
video. 



La memoria può essere stata dimensionata in modo 
esplicito tramite il comando SBASIC oppure viene 
assunta per default pari a 36800 byte. 11 valore 
dello stack viene assunto per default. 



CLEAR ,32768 



come sopra, 
32768 byte. 



la memoria viene dimensionata a 
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CLEAR ,,2000 come nel primo esempio, ma lo stack è stato 

dimensionato a 2000 byte. 



CLEAR ,32768,2000 come nel primo esempio, ma la memoria viene 

dimensionata a 32768 byte e lo stack a 2000 
byte. 



Note 



All'inizio dell'esecuzione di un programma BASIC, tutte le variabili 
numeriche vengono azzerate e tutte le variabili stringa vengono 
inizializzate al valore stringa nulla (ad eccezione delle variabili 
definite nell'area COMMON in fase di CHAlNing di un programma ad un 
altro, vedere il Capitolo 11). Non è quindi necessario usare un'istru- 
zione CLEAR all'inizio del programma al solo scopo di azzerare le 
variabili numeriche e di inizializzare le variabili stringa al valore 
stringa nulla. 

Il BASIC alloca in modo dinamico lo spazio riservato alle stringhe. 
Viene visualizzata una segnalazione d'errore (Out of string space) nel 
caso in cui non ci sia memoria sufficiente per il BASIC. 



LET (PROGRAMMA/IMMEDIATO) 



Assegna un valore ad una variabile. 



X(LEÌ)-l-J" 



expression 



Figura 5-2 Istruzione LET 
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Esempi 



SE l'utente imposta... 


ALLORA... 


LET K » 1.5 m 


il valore 1.5 è assegnato alla 
variabile numerica K 


LET X = K + 2 m 


il valore dell'espressione numeri- 

f* fl. K + / P AC^onnst'ri alla iorì a 

o '\ » <- c □ j oc'ji la iu alla voi lo 

bile numerica X 


AS(1) = "ABC" lìl 


il valore della costante stringa 
"ABC" è assegnato alla variabile 
stringa con indice A$(l) 

Nota: La parola chiave LET è 
opzionale 


Assegnazioni numeriche 



Se il valore dell'espressione numerica non è dello stesso tipo della 
variabile di destinazione (cioè la variabile che compare alla sinistra 
del segno di uguaglianza) il BASIC converte il tipo del valore dell'e- 
spressione in modo da renderlo uguale a quello della variabile di de- 
stinazione in base alle regole precedentemente descritte (vedere il 
paragrafo CONVERSIONI NUMERICHE del Capitolo 4). Se la variabile di 
destinazione non può contenere il valore calcolato, può verificarsi un 
arrotondamento oppure un overflow. 

Assegnazioni stringa 

L'assegnazione stringa viene effettuata trasferendo il valore dell'e- 
spressione stringa nella variabile di destinazione, carattere per 
carattere da sinistra a destra. L'operazione termina quando tutti i 
caratteri sono stati trasferiti. 

Note 

Non sono ammesse assegnazioni simultanee. Se ad esempio si impostasse: 
100 LET B% =C% = 0 WàM 
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il BASIC INTERPRETEREBBE IL SECONDO SEGNO DI UGUAGLIANZA COME UN 
OPERATORE DI CONFRONTO e assegnerebbe a B% il valore -1 (cioè vero) se 
C% è uguale a 0, ed il valore 0 (cioè falso) se C% è diverso da zero. 
(Per ulteriori dettagli sulle espressioni di confronto vedere il 
Capitolo 6) . 



SUAP (PROGRAMMA/IMMEDIATO) 




Permette di scambiare i valori di due variabili semplici. L'istruzione 
SUAP può essere eseguita con qualsiasi tipo di variabile (intera, in 
semplice precisione, in doppia precisione, stringa), ma le due variabili 
devono essere dello stesso tipo, altrimenti verrà visualizzato l'errore 
"Type mismatch" (incompatibilità di tipo). Le variabili devono anche 
essere inizializzate, altrimenti verrà visualizzato l'errore "Illegal 
function cali". 




Figura 5-3 istruzione SUAP 



Eseapio 



VIDEO 



COMMENTI 



LIST 

10 AS = " ONE " 
20 B$ = " ALL" 
30 C$ = " FOR " 
40 PR1NT A$;C$;B$ 
50 SWAP A$;B$ 
60 PRINT A$;C$;BS 
Ok 
RUN 

ONE FOR ALL 
ALL FOR ONE 
Ok 



L'istruzione 50 esegue l'opera- 
zione di SUAP fra le variabili A$ 
e BS. L'istruzione 40 visualizza 
ONE FOR ALL, l'istruzione 60 
visualizza ALL FOR ONE. 
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IL FILE DATI INTERNO 



Molti problemi rendono necessaria l'introduzione di una grande quantità 
di dati nel computer. Per fare ciò, l'utente può utilizzare ripetu- 
tamente le istruzione LET, INPUT e LINE INPUT. 

E' evidente, però, che tale procedura può risultare, in certi casi, 
molto pesante. Un metodo molto più conveniente ed efficace per intro- 
durre dati è quello, di servirsi delle istruzioni DATA, READ e RESTORE. 

Le istruzioni DATA creano un file "interno", cioè una sequenza di dati 
(del programma), che devono essere trasferiti nelle variabili di pro- 
gramma con l'uso di una o più istruzioni READ. 

L'istruzione RESTORE riposiziona il puntatore ("pointer") all'inizio del 
file o al numero di linea specificato. 



DATA/READ/RESTORE (PROGRAMMA 




DATA crea un file dati interno. 

READ legge i dati dal file interno (creato con una o più istruzioni 
DATA) e li assegna alle variabili specificate. 

RESTORE sposta il pointer all'inizio di un file dati interno o al numero 
di linea specificato. 




Figura 5-4 Istruzione DATA 




Figura 5-5 Istruzione READ 
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RESTORE 



Figura 5-6 Istruzione RESTORE 



Esempi 



VIDEO 


COMMENTI 


LIST 




i valori da 1 a 10 vengono 


10 READ A.B.C.O.E.F.G.H 


,1,3 


assegnati a dieci variabili 


20 DATA 1 ,2,3,4,5,6,7,8 


,9,10 




30 PR1NT A;B;C;D;E;F;G; 


H;I;J 




Ok 






RUN 






1 2 3 4 5 6 7 8 


9 10 




Ok 






LIST 




le istruzioni 10, 20, 30 e 40 


10 DATA 1 ,2,3,4 




hanno lo stesso effetto delle 


20 READ A,B,C,D,E,F,G,H 


,1,3 


istruzioni 10 e 20 dell'esempio 


30 DATA 5,6,7 




precedente. 


40 DATA 8,9,10 






50 PR1NT A;B;C;D;E;F;G; 


H;1;J 


Nota: Un'istruzione DATA in un 


Ok 




programma non deve necessaria- 


RUN 




mente corrispondere ad una ben 


1 2 3 4 5 6 7 8 


9 10 


determinata istruzione READ. Ciò 


Ok 




avviene perchè prima dell'e- 
secuzione di un programma viene 
creato un file dati (il file dati 
"interno"). Questo file contiene i 
valori relativi a tutte le istru- 
zioni DATA del programma secondo 
la sequenza dei numeri di linea. 
Nel corso dell'esecuzione del 
programma, l'istruzione READ ac- 
quisisce i suoi valori da questo 
file. 
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LIST 


l'istruzione 10 assegna i valori 


10 READ A,B,C 


1,2,3 ad A,B e C, l'istruzione 40 


20 DATA 1 ,2,3,4,5,6,7,8,9,10 


assegna i valori 4,5,6 e 7 a 


30 PR1NT A;B;C 


D,E,F,G rispettivamente. 


40 READ D.E.F.G 




50 PR1NT D;E;F;G 


Nota: Non è necessario leggere, 


RUN 


uno alla volta, i valori del file 


1 2 3 


dati. 


4 5 6 7 




Ok 




i t st 

Lljl 


1 ' M? 0. visnfl1i77fl un mpssaooio di 


10 READ A,8,C,D,E 


errore: 


20 DATA 1,2,3,4 




Ok 


Out of data 


RUN 




Out of data 


e ritorna in 5tato Comandi, perchè 


Ok 


ci sono più variabili che dati. 


LIST 


l'istruzione 10 fa si che alla 


10 READ A.B.C 


variabile A venga assegnato il 


20 DATA 15,25,35,5,6,12 


valore 15, a B il valore 25 e a C 


30 PR1NT A;B;C 


il valore 35. L'istruzione RESTORE 


40 RE STO RE 


dell.i linea 40 fa si che i valori 


50 READ X.Y.Z 


vengano assegnati partendo nuova- 


60 PR1NT X;Y;Z 


mente dall'inizio del file. Quindi 


Ok 


l'istruzione 60 fa si che gli 


RUN 


stessi valori assegnati ad A,8,C 


1C 7C 3C 

1 J t«J JJ 


(IR ?R 35) siano asseonati risDet— 


15 25 35 


ti vanente a X,Y,Z. 


Ok 


Se non si fosse utilizzata l'i- 
struzione RESTORE, ad X sarebbe 
stato assegnato il valore 5, ad Y 
il valore 6 e a Z il valore 12. 


LIST 


l'istruzione 10 fa si che ad XI $ 


10 READ X1S.Y1S.Z1 


sia assegnato il valore DENVER, 


20 DATA "DENVER,", COLORADO, 80211 


(inclusa la virgola finale), ad 


30 PR1NT X1S;Y1S;Z1 


Y1$ il valore COLORADO e a Z1 il 


Ok 


valore 80211 . 


RUN 




DENVER, COLORADO 80211 


Nota: Le istruzioni READ possono 


Ok 


contenere sia variabili numeriche 
che variabili stringa. 
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Le istruzioni DATA possono conte- 
nere sia dati numerici che dati 
stringa. 

Il tipo di un dato in ingresso 
(nella sequenza dei dati) deve 
essere coerente al tipo di varia- 
bile alla quale deve essere asse- 
gnato; cioè le variabili numeriche 
richiedono, come dati, costanti 
numeriche (è consentita la conver- 
sione da un tipo numerico ad un 
altro, per esempio é possibile 
avere una costante in singola 
precisione associata a una varia- 
bile intera), mentre le variabili 
stringa richiedono dati stringa 
tra virgolette o senza virgolette. 
Una stringa deve essere tra virgo- 
lette se contiene virgole (ad 
esempio DENVER,) oppure spazi 
iniziali o finali (ad esempio lo 
spazio che precede COLORADO nel- 
l'istruzione 20 non viene assegna- 
to alla variabile Y1$ perchè 
COLORADO è una stringa non rac- 
chiusa tra virgolette). 



ISTRUZIONI DI INPUT 

L'istruzione DATA utilizza costanti per assegnare valori a variabili. 
Quando si introduce un programma, occorre conoscere quali valori si 
intendono assegnare. Inoltre i /*iori contenuti nel file dati interno, 
sono registrati su disco insieme con il programma. Questi valori sono 
quindi permanenti e possono essere modificati solo cambiando una o più 
istruzioni DATA del programma. 

Le istruzioni INPUT e LINE INPUT offrono una maggior flessibilità in 
quanto consentono di introdurre valori solo al momento dell'esecuzione 
del programma. 
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Quando il controllo dell'esecuzione arriva su una di queste istruzioni, 
l'esecuzione del programma viene sospesa e l'M20 rimane in attesa di 
dati da tastiera. Dopo che il programma è stato registrato in memoria, è 
possibile eseguirlo ogni volta che lo si desideri ed è possibile fornire 
i valori al computer sul momento senza dover modificare il programma. 
Questa flessibilità consente, pertanto, di scrivere un programma 
generale atto a risolvere un problema particolare ancora prima di 
conoscere i valori specifici che il programma dovrà utilizzare. Se si 
devono, però, introdurre molti dati è preferibile utilizzare un file 
dati interno (dati permanenti) o uno o più file dati esterni (vedere il 
Capitolo 12). 

L'istruzione INPUT consente l'introduzione di uno o più dati numerici o 
dati stringa (separati da una virgola) che saranno assegnati alla 
variabile o alle variabili indicate nell'istruzione. 

L'istruzione LINE INPUT permette di introdurre un'intera linea di input 
e di assegnarla ad una variabile stringa. E' possibile inserire un 
messaggio atto a ricordare il significato dei dati da impostare 
(messaggio prompt) sia nell'istruzione INPUT che nella LINE INPUT; 
questo messaggio appare sul video quando l'istruzione viene eseguita. 



INPUT (PROGRAMMA) 



Legge dati da tastiera e li assegna ad una o a più variabili specifi- 
cate. 




Figura 5-7 Istruzione INPUT 
Un Punto Interrogativo 

Un punto interrogativo (seguito da uno spazio) viene automaticamente 
visualizzato come uno "standard prompt" in fase di esecuzione di 
un'istruzione INPUT, anche se l'istruzione non include la clausola 
"prompt string". 
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VIDEO 


COMMENTI 


LIST 




quando si esegue l'istruzione 10 


10 INPUT X 




lo "standard pronpt" (? ) viene 


20 PR1NT X 


"SQUARED IS" XA2 


visualizzato e con ciò si indica 


30 END 




che il programma è in attesa di un 


Ok 




dato. 


RUN 






? 5 




In questo caso non si utilizza la 


5 SQUARED 


1S 25 


clausola "prompt string" nel- 


Ok 




l'istruzione INPUT (vedere l'i- 






struzione 10). 



Self Prompting 

Inserendo una "pronpt string" in una istruzione INPUT, l'utente può 
visualizzare il messaggio che desidera (self pronpting) per ricordare il 
valore (o i valori) da introdurre. 



VIDEO COMMENTI 



LIST l'esecuzione dell'istruzione 20 fa 

10 PI = 3.1415 visualizzare il messaggio Radius 

20 INPUT "Radius";R davanti allo standard prompt (? ) 

30 A = Pl*RA2 

40 PRINT "Area";A 

50 GOTO 20 

Ok 

RUN 

Radius? 7.4 
Area 172.029 
Radius? 
ecc. 



5-11 



Eliminazione dello Standard Prompt 



L'utente può eliminare lo standard prompt (? ), scrivendo una virgola 
(anziché un punto e virgola) dopo il prompt. 



VIDEO 


COMMENTI 


LIST 




lo standard prompt (?) viene 


10 INPUT "Date 


", D$ 


eliminato perchè nell'istruzione 


20 PRINT D$ 




10 la stringa "Date" (prompt 


Ok 




string) è seguita da una virgola 


RUN 




(,) anziché da un punto e virgola 


Oate 3(J/0ct/69 




(;)• 


30/Oct/69 






Ok 







Eliminazione dell'Eco di Bfli 

L'utente può eliminare l'eco di U9 S| J video introducendo un punto e 
virgola (;) dopo la parola chiave INPUT. 



VIDEO 


COMMENTI 


LIST 


l'eco su video del ritorno a 


10 INPUT; "Date";D$ 


capo/interlinea viene eliminato 


20 PRINT " J.C." 


inserendo un punto e virgola (;) 


Ok 


immediamente dopo la parola chiave 


RUN 


INPUT (vedere l'istruzione 10). 


Date? 30/Oct/69 J.C. 






La successiva operazione PR1NT/1N- 




PUT (vedere l'istruzione 20) sarà 




eseguita dalla successiva posizio- 




ne su video. 



LINGUAGGIO BASIC - MANUALE GENERALE 



COME VENGONO INTRODOTTI I DATI IN BASIC 



Introduzione di una Lista di Dati 



Una istruzione INPUT consente l'inserimento da tastiera di uno o più 
dati numerici o dati stringa. 



VIDEO 


COMMENTI 


LIST 


quando si esegue l'istruzione 10 


10 INPUT A,BS,C(3) 


l'utente deve introdurre tre dati. 


20 PRINT A;BS;C(3) 


Il primo deve essere numerico 


30 GOTO 10 


(1.2), il secondo di tipo stringa 


Ok 


(ABC) (non è necessario che sia 


RUN 


tra virgolette), il terzo numerico 


? 1 .2, ABC, 4 


(4). 


1 .2 ABC 4 




? Ann 1 3 e 
r AbU , \ . 5 , b 


Verranno assegnati rispettivamente 


?Redo from start 


alle variabili A,B$ e C(3). 


? 1.3.ABD.5 




1 3 Ann e 


Quando si esegue per la seconda 


? AC 


volta l'istruzione 10 supponiamo 


DlcdK in 1)0 


di assegnare un dato non coerente 


Ok 


(ABD), e cioè una stringa al posto 




di un numero. 11 sistema visualiz- 




za: 




? Redo from start 




e l'utente deve introdurre nuova- 




mente i dati. 




Per interrompere l'esecuzione del 




programma occorre premere EifcH Q 




Per riprenderne l'esecuzione pre- 




mere HOUU EAM 




Nota: 11 tipo di dato, che viene 




introdotto da tastiera, deve es- 




sere dello stesso tipo della 




variabile di destinazione, cioè le 




variabili numeriche richiedono, 




come dati, costanti numeriche (è 




possibile la conversione da un 




tipe numerico ad un altro, ad 




esempio una costante in doppis 
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precisione può essere associata ad 
una variabile intera), e le «aria- 
bili stringa richiedono, come 
dati, stringhe racchiuse o no tra 
virgolette. E' necessario che la 
stringa sia racchiusa tra virgo- 
lette se contiene virgole o spazi 
iniziali o finali. 

Valori numerici possono essere 
introdotti in variabili stringa 
tramite un'istruzione INPUT. Se 
introduciamo un numero in una 
variabile stringa, questo viene 
interpretato come la sequenza dei 
corrispondenti caratteri ASCII. 
Per riottenere il valore numerico, 
l'utente dovrà usare la funzione 
VAL (vedere il Capitolo 9), altri- 
menti si avrebbero errori di 
incompatibilità di tipo. 



? Redo from Start 

Se ad un richiesta di INPUT si risponde con troppi o con pochi dati, 
oppure con un dato di tipo non corretto (un dato stringa al posto di un 
dato numerico), su video verrà visualizzato il messaggio d'errore "? 
Redo from Start". Fin quando l'utente non fornirà una risposta corretta, 
non verrà assegnato alcun valore alle variabili. 



LINE INPUT (PROGRAMMA) 



Permette l'introduzione di una intera linea, fino al ritorno a capo/in- 
terlinea e la assegna ad una variabile stringa senza far uso di deli- 
mitatori (la lunghezza massima di una linea è di 255 caratteri). 



r— N 






pfompi 




st'ing 




figura 5-8 Istruzione LINE INPUT 
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Un Punto Interrogativo all'interno di un Pronpt 

Lo standard prompt (? ) non compare quando si esegue una istruzione LINE 
INPUT. Se si desidera visualizzare il punto interrogativo si dovrà 
includerlo alla fine della clausola "prompt string". 



VIDEO 




COMMENTI 


LIST 




la stringa prompt (Name? ) viene 


10 LINE INPUT "Name? ";N$ 


visualizzata prima dell'introdu- 


20 PRINT "JONES" 


zione dei dati. 


Ok 




RUN 




Tutti i caratteri introdotti dalla 


Name? LINDA 




fine del prompt al HU^vengono 


JONES 




assegnati alla variabile stringa 


Ok 


(N$). 



Eliminazione dell'Eco di Wi'M 

E' possibile eliminare l'eco di BUI su video introducendo un punto e 
virgola (;) subito dopo LINE INPUT. 



VIDEO 




COMMENTI 


LIST 




l'eco sul video del ritorno a 


10 LINE lNPUT;"Name? ";N$ 




capo/interlinea viene eliminato 


20 PRINT " JONES" 




inserendo un punto e virgola (;) 


Ok 




subito dopo LINE INPUT (vedere 


RUN 




l'istruzione 10). 


Name? LINDA JONES 






Ok 




La prossima operazione PRINT/1NPUT 
(vedere l'istruzione 20) incomin- 
cerà a visualizzare i caratteri 
dalla posizione successiva su 



video. 
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SOMMARIO 



Questo capitolo classifica le espressioni usate in BASIC in numeriche 
stringa, di confronto o logiche. 

Vengono descritte le regole che l'utente deve rispettare nella formula 
zione dell'espressione ed il livello di priorità che il BASIC assume ne 
loro svolgimento. 



INDICE 



ESPRESSIONI NUMERICHE 



6-1 



ESPRESSIONI STRINGA 



6-9 



ESPRESSIONI DI CONFRONTO 



6-10 



ESPRESSIONI LOGICHE 



6-12 



LIVELLO DI PRIORITÀ 
DEGLI OPERATORI 



6-16 



ESPRESSIONI 



ESPRESSIONI NUMERICHE 

La maggior parte dei programmi richiede una qualche forma di calcolo 
numerico. 

Come si è potuto notare negli esempi fatti, alla sinistra del segno di 
uguaglianza di un'istruzione LET appaiono solo variabili. 

Alla destra del segno uguale possono invece apparire sia variabili che 
costanti. Infatti, esse possono essere collegate da simboli speciali 
chiamati operatori, che indicano quale operazione numerica deve essere 
svolta. 

Si considerino i seguenti esempi: 

70 LET L=ACC0UNT 
60 LET Y = 16+1 .7+12 
200 M = 83-44+37/N 
20 LET X = X+1 

L'ultima istruzione è di particolare interesse. La maggior parte delle 
istruzioni LET ha le caratteristiche delle equazioni algebriche, 
quest'ultima no. L'equazione X = X+1 è priva di significato da un punto 
di vista algebrico. 

L'istruzione LET assegna un valore ad una variabile: non implica che i 
valori su entrambi i lati del segno di uguaglianza siano matematicamente 
uguali. Quest'ultima istruzione è valida e significativa e può essere 
interpretata nel seguente modo: si aggiunga 1 al valore della variabile 
X e si assegni ad X questo nuovo valore. 11 nuovo valore di X sostituirà 
quello vecchio. 11 segno di uguale è un operatore. 

La parte dell'istruzione LET alla destra del segno di uguale si chiama 
espressione. L'espressione specifica quale valore deve essere assegnato 
alla variabile che si trova alla sua sinistra. (Lo svolgimento di una 
espressione porta ad un solo valore numerico). Una espressione numerica 
può essere composta da un solo numero o da una sola variabile numerica o 
da una combinazione di numeri e di variabili numeriche e operatori. Si 
deve però tenere presente che occorre assegnare un valore ad una 
variabile numerica prima che questa possa essere usata in una 
espressione. In caso contrario, alla variabile numerica viene automati- 
camente attribuito il valore 0. 

Alcuni esempi di espressioni numeriche sono presentati qui di seguito: 
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X 

X+Y+SPEEO 

6.4A2 

-7+A/CYAR 



Operatori Numerici 

Come si è notato in precedenza, il BASIC si serve di operatori per 
definire le operazioni numeriche. Vi sono otto operazioni numeriche, 
ognuna caratterizzata da un proprio simbolo. 



SIMBOLO 


OPERAZIONE 


ESEMPI 


+ 


addizione 


X = 3.2 






Ok 






?X+1.1 






4.3 






Ok 




sottrazione 


?X-1.3 



1 .9 
Ok 



divisione tra interi 


?10\4 
2 


Gli operandi sono arrotondati 


Ok 


al numero intero più vicino 


? 25.68\6.99 


(che deve essere compreso nel- 


3 


l'intervallo da -32768 a 32767) 


Ok 


prima di effettuare la divi- 




sione e anche il quoziente 




viene troncato al valore in- 




tero più vicino. 




divisione modulo 


?10.4 MOD 4 




2 





Fornisce quel numero intero 


Ok 




che è il resto di una divisio- 






ne tra numeri interi 


(10/4=2 con resto 2) 






?25.68 MOD 6.99 






5 






Ok 






(26/7=3 con resto 5) 



► 
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* 


(noi ti pi i cazione 








12.544 






Ok 


/ 


ai vi sione 


?3/6.05 






0.495868 






Ok 




rsmhl Amon fri Hi conn/\ 
UcJiiiu l dlllcl 1 LU ui scyriu 


I-A 






-3.2 






Ok 


A 


elevamento a potenza 


?XA3 






32.768 






Ok 



Note 

Accertatevi di usare il simbolo * quando si vuole eseguire una moltipli- 
cazione. In matematica, 6X è una espressione valida; nel linguaggio 
BASIC, si deve, invece, usare 6*X per esprimere la moltiplicazione per 
sei volte della variabile X. 



Per comodità, tutti gli operatori numerici usati in BASIC sono 
disponibili sia nella sezione numerica della tastiera dell' M20 che in 
quella alfanumerica (ad eccezione del simbolo di elevamento a potenza, 
che compare solo nella sezione alfanumerica, e di MOD che deve essere 
introdotto digitando i tre caratteri che lo compongono). 



Livello di Priorità degli Operatori Numerici 

Quando nell'ambito di una espressione vengono utilizzati due o più opera- 
tori, spesso si potrebbero verificare situazioni ambigue. Ad esempio, 
1 ' espressione: 



3*L - 6*U 

deve intendersi 

<3*L) - (6*W) 
oppure 

3*(L-6*W)? 
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Il linguaggio BASIC ha, però, dei livelli di priorità, che vengono segui- 
ti nell'esecuzione delle diverse operazioni numeriche. Le operazioni 
numeriche e i livelli di priorità vengono riportati qui di seguito (nel- 
l'ordine di priorità decrescente). 



LIVELLO DI PRIORITÀ' 




OPERAZIONE 


COMMENTI 


IL PIÙ ' ALTO 




elevamento a potenza 








cambiamento di segno 








moltiplicazione e 
divisione 


la moltiplicazione e 
la divisione hanno lo 

ctoctn liwplln Hi 

priorità 






divisione tra in- 
teri 








divisione modulo 




IL PIÙ' BASSO 




addizione e sottra- 
zione 


l'addizione e la sot- 
trazione hanno lo 
stesso livello di prio- 
rità 



Note 

Riferendoci all'esempio precedente, possiamo ora dire che l'espressione 
3*L - 6*W deve intendersi (3*L) - (6*U). 

Nel caso di operatori con la stessa priorità (ad. es. / e *) le 
operazioni vengono eseguite nell'ordine da sinistra a destra. Quindi, 
9/3*3 è l'equivalente di (9/3)*3: entrambe portano allo stesso risultato 

di 9. 




Uso delle Parentesi per Modificare il Livello di Priorità 

Si possono presentare dei casi in cui si vuole cambiare il livello 
normale di priorità con cui vengono eseguite le operazioni. Per ottenere 
questo, si devono usare le parentesi con le stesse modalità dell'alge- 
bra. In questo caso, il calcolo inizia con lo svolgimento delle 
operazioni racchiuse tra le parentesi più interne per poi passare via 
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via a quelle più esterne. All'interno di una coppia di parentesi, viene 
rispettato il livello normale di priorità delle operazioni. 

Qui di seguito viene presentato un semplice esempio di utilizzazione 
delle parentesi. 

Supponiamo di voler calcolare (5X)^. Se in BASIC questa espressione 
viene impostata sotto forma di 5*XA2, la X viene innanzi tutto elevata 
al quadrato, ed il risultato viene successivamente moltiplicato per 5, 
dal momento che l'elevamento a potenza ha un livello di priorità 
superiore alla moltiplicazione. Per modificare questa situazione, è 
sufficiente impostare l'espressione sotto forma di (5*X)A2. In questo 
caso, la X viene dapprima moltiplicata per 5 ed il risultato viene poi 
elevato al quadrato. 

E' evidente che l'equivalente in BASIC risulterà tanto più complesso 
quanto più complessa sarà l'espressione numerica. Negli esempi riportati 
qui di seguito, si evidenziano espressioni numeriche ed i loro 
equivalenti in BASIC. Tali esempi dovrebbero contribuire ad una più 
agevole comprensione delle regole di priorità. 



Esempi 



ESPRESSIONE 
NUMERICA 


EQUIVALENTE 
IN BASIC 


INTERPRETAZIONE 


x + y + z 
2 


(X+Y+Z)/2 


1 . Sommare X ,Y e Z 

2. Dividere la somma per 2 


y + z 
" + 2 


X+(Y+Z)/2 


1 . Sommare Y e Z 

2. Dividere la somma per 2 

3. Sommare X al risultato 


2x + 5 


2*X+5 1 


1. Moltiplicare X per 2 

2. Sommare 5 al risultato 


2(x + 4) 


2*(X+4) 


1 . Sommare 4 e X 

2. Moltiplicare la somma per 2 


x 2 + 3 | 


XA2+3 


1. Elevare X al quadrato 

2. Sommare 3 al risultato 



► 
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.,2 

(x + 3r 


(X+3)A2 


1 . Sommare 3 e X 

2. Elevare al quadrato il risultato 


(x ♦ 3) 2 
4 


(X+3)A2/4 


1 . Sommare 3 e X 

2. Elevare la somma al quadrato 

3. Dividere il risultato per 4 


2 

x x + y 
6 2 


(XA2/6)*((X + Y)/2)> 


1. Elevare X al quadrato e dividere 
il risultato per 6 

2. Sommare X e Y e dividere per 2 

3. Moltiplicare il primo risultato 
per il secondo 



Note 

E' buona norma di programmazione fare uso delle parentesi ogni volta che 
vi sono dubbi sullo svolgimento dell'espressione, anche quando esse non 
sono strettamente necessarie. 

Le espressioni usate in un programma, possono essere molto complesse. 
Nell'eventualità che un programma venga registrato in memoria e sia 
utilizzato solo sporadicamente, è facile dimenticare i calcoli che esso 
esegue. Per questo motivo, quando si scrive un programma è utile usare 
l'istruzione REM del linguaggio BASIC ed i campi commento. 

Tipo di Espressione 

Il tipo di un'espressione numerica, e cioè il tipo del risultato 
ottenuto dallo svolgimento di un'espressione (prima della sua assegna- 
zione ad una variabile) dipende dal tipo degli operandi. 

Si possono ipotizzare quattro situazioni a seconda del tipo dei due 
operandi in questione. 

L'espressione, nell'eventualità in cui in essa intervengano più di due 
operandi, può essere considerata come una serie di calcoli in cui 
intervengono due operandi. 

La tabella che segue fornisce un sommario delle quattro situazioni 
possibili . 
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SE. . . 


1 

ALLORA... 


VIDEO 


entrambi gli operandi 
sono dello stesso 
tipo numerico (in- 
tero, in precisione 
semplice, in precisio- 
ne doppia) 


il risultato è dello 
stesso tipo degli 
operandi 


A 8 = 3.29745219 
Ok 

B H = 4.5729719D-1 
Ok 

?A8+B* 
3.75474938 
Ok 


un operando è in- 
tero mentre l'altro 
è in semplice pre- 
cisione 


il risultato è in 
semplice precisione 


1% = 25 
Ok 

C! = 4.2975 
Ok 

?1VC! 

20.7025 
Ok 


un operando è in- 
tero mentre l'altro 
è in doppia pre- 
cisione 


il risultato è in 
doppia precisione 


?1%*A# 

82.43630475 
Ok 


un operando è in 
semplice precisione 
e l'altro in doppia 
preci sione 


il risultato è in 
doppia precisione 


m/M 

9.39760887993736 
Ok 



Arrotondamento, Overflow e Underflow 

I numeri in. virgola mobile costituiscono una forma di approssimazione 
dei numeri reali della matematica. 



SE. .. 


ALLORA... 


in un'espressione nu- 


il calcolo 


è approssimato e si 


può perdere in 


merica, uno o più 


precisione. 


In questo caso non 


si tiene conto 


operandi sono in vir- 


delle cifre 


meno significative e 


l'ultima cifra 


gola mobile 


considerata 


viene arrotondata. 





► 
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il valore dell'espres- 
sione supera il valore 
massimo, che può esse- 
re memorizzato nella 
van'ahilp rirpvpnte 


viene visualizzato un messaggio di "Overflow"; 
come risultato viene fornito, con il segno 
algebrico corretto, l'infinito di macchina, 
dopo di che l'esecuzione continua 


viene eseguita ] 
una divisione per 
zero 


viene visualizzato il messaggio "Division by 
Zero"; come risultato della divisione viene 
fornito l'infinito di macchina con il segno del 
numeratore, dopo di che l'esecuzione continua. 


il calcolo di un 
elevamento a potenza 
dà luogo ad un va- 
lore nullo elevato 
ad una potenza nega- 
tiva 


viene visualizzato il messaggio "Division by 
Zero"; come risultato dell'elevamento a potenza 
viene fornito l'infinito di macchina, con segno 
positivo dopodiché l'esecuzione continua. 


il valore dell'espres- 
sione è minore del più 
piccolo valore rappre- 
sentabile 


il valore diviene zero (Underflow) dopo di che 
l'esecuzione continua. 


in un'assegnazione 
numerica, il tipo 
dell'espressione è 
diverso dal tipo 
della variabile ri- 
cevente 


il tipo dell'espressione viene, automaticamente, 
convertito al tipo della variabile ricevente. 



Nota: L'infinito di macchina viene visualizzato come 3.40282E+38. 



Valori non Definiti 

Qualora in una espressione numerica una variabile numerica non sia 
ancora stata inizializzata, essa viene inizializzata al valore zero. 

Forme Indeterminate 

Lo svolgimento di un'espressione numerica può sfociare in una forma 
indeterminata del tipo: 
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0/0 : viene visualizzato il messaggio "Division by Zero" e viene fornito 
il valore 3.40282E+38 (infinito di macchina). 

0 A (?: si assume un valore uguale ad 1. 



E SPRESSION I STRINGA 

Il linguaggio BASIC consente l'utilizzazione di espressioni stringa che, 
per molti versi, sono analoghe alle espressioni numeriche appena 
esaminate. Una espressione stringa può essere o una costante stringa, o 
una variabile semplice stringa, o un elemento di una matrice stringa, o 
una funzione stringa o una concatenazione degli elementi suddetti 
mediante l'utilizzo del segno di addizione (+). 

Utilizzando questo segno, le stringhe possono essere "concatenate". Qui 
di seguito, vengono mostrati alcuni esempi di espressioni stringa usate 
nell'ambito di un'istruzione LET. 

50 LET AS = "Chicago," 
90 BS = "IL.," 
100 N$ = A$+B$+"USA" 

La concatenazione, indicata nell'istruzione 100, fa si che ad N$ venga 
assegnata la stringa 

Chicago, IL., USA 

La lunghezza di una stringa risultante da una concatenazione di una o 
più stringhe è uguale alla somma della lunghezza delle singole stringhe. 
Lo svolgimento dell'espressione procede da sinistra verso destra. 

Si deve evitare di assegnare più di 255 caratteri ad una variabile 
stringa, altrimenti il sistema evidenzierà il messaggio d'errore: 

String too long 



Nota 

L'operando di una stringa che compare in una espressione stringa può 
essere la stringa nulla (""). La stringa nulla può anche essere il 
valore di default di una variabile stringa non inizializzata. 
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Una espressione di confronto paragona due espressioni numeriche o 
stringa mediante l'uso di operatori di confronto. 

Operatori di Confronto 

Gli operatori di confronto, elencati qui di seguito, sono: 

= uguale (il segno di uguale viene anche utilizzato per 

assegnare un valore ad una variabile, vedere 
1 ' istruzione LET ) 

> maggiore di 

< minore di 

>= (oppure =>) maggiore di o uguale a 

< = (oppure =<) minore di o uguale a 

<> (oppure ><) non uguale a. 

Non è consentito confrontare una espressione numerica con una espres- 
sione stringa e viceversa. Ad esempio: 



A + B>C è valido 

C + D>=E + F è valido 

AS = BS è valido 

BS'CI non è valido, se C1 è una variabile numerica. 



11 confronto tra numeri ha un significato ovvio. E' anche possibile il 
confronto di stringhe di caratteri. Esso dipenderà dal valore numerico 
della rappresentazione del carattere (che viene stabilita in base al 
valore decimale ASCII di ogni carattere nell'ambito di una stringa). 11 
confronto delle stringhe viene effettuato da sinistra verso destra, 
carattere per carattere e termina al primo carattere diverso. 11 
risultato del confronto è fatto in base a questi caratteri. 

Innanzi tutto vengono svolte le espressioni numeriche o stringa, poi 
vengono applicati gli operatori di confronto ai risultati di tali 
espressioni . 
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Ad esempio, lo scrivere 
A>B + C 

è equivalente allo scrivere 
A>(B + C) 

L'espressione di confronto fornisce un risultato numerico. Esso può 
essere -1 (se il confronto è vero) oppure 0 (se invece è falso). 



Esempi 

Consideriamo alcuni esempi, che prevedono l'uso di espressioni di 
confronto. Assegniamo, innanzi tutto, dei valori alle variabili X ed Y. 



VIDEO 


COMMENTI 


X=1 
Ok 
Y=2 
Ok 


Il BASIC esegue le assegnazioni specificate 


?X-Y 
0 
Ok 


11 BASIC visualizza 0 (cioè falso), poiché X non 
è maggiore di Y 


?X- Y 

-1 

Ok 


Il BASIC visualizza -1 (cioè vero), poiché X è 
diverso da Y 


?S1N(X)- 0 
0 
Ok 


Il BASIC visualizza 0 (cioè falso), poiché 
S1N(X) è positivo 


?X MOD Y=1 

-1 

Ok 


Il BASIC visualizza -1 (cioè vero), poiché X MOD 
Y è uguale ad 1 


?"T0KY0" > "FRANKFURT" 

-1 

Ok 


Il BASIC visualizza -1 (cioè vero), poiché TOKYO 
è maggiore di FRANKFURT (cioè segue FRANKFURT 
nell'ordine alfabetico) 
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?"T0KYO">"TOKYO1' 

0 
Ok 



Il BASIC visualizza 0 (cioè falso), poiché TOKYO 
è inferiore a T0KY01 . Quando due stringhe sono 
di diversa lunghezza e la più corta è identica 
alla prima parte di quella più lunga allora 
quest'ultima è considerata maggiore 



L'uso di Espressioni di Confronto 

11 risultato di una espressione di confronto può essere utilizzato per 
prendere una decisione a proposito di un flusso di programma. E 1 
possibile usare le espressioni di confronto nell'ambito delle seguenti 
istruzioni di controllo: 

- IF. . .GOTO. . .ELSE, oppure 

- IF. . . THEN. . .ELSE , oppure 

- UH1LE 

dove viene controllata una condizione al fine di determinare le 
successive operazioni del programma (vedere il Capitolo 8). 

La condizione può consistere in una espressione numerica, di confronto o 
logica. Il BASIC determina se la condizione (dopo IF oppure WHILE) è 
vera o falsa controllando il risultato dell'espressione per verificare 
se sia uguale a zero o meno. Un risultato diverso da zero è assunto come 
valido, mentre lo zero viene considerato falso. 

Ad esempio, la seguente istruzione: 

100 IF AS>B$ THEN 50 ' — • 

trasferisce il controllo dell'esecuzione all'istruzione 50 se la 
condizione (A$>B$) è vera. Se invece la condizione è falsa (e cioè A$ 
non è maggiore di B$) viene eseguita l'istruzione successiva. 



ESPRESSIONI LOGIC HE 

Un'espressione logica è formata da un operando preceduto dall'operatore 
logico NOT, oppure da due operandi separati da un altro operatore logico 
(AND, OR, XOR, EQV, e 1MP) o da due operandi separati da un operatore 
logico e da NOT. 
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Gli operandi in un'espressione logica possono essere espressioni 
numeriche o di confronto. Entrambe forniscono un risultato numerico. 

11 risultato di un'espressione logica è anch'esso numerico: è un valore 
intero con qualsiasi combinazione di bit nell'intervallo da -32768 a 
32767. 

Di seguito sono presentati alcuni esempi di espressioni logiche. 

NOT X è valido 

X AND Y è valido 

A>B OR C>D è valido 

1% ANO A$-=BS è valido 

A$ XOR B$ non è valido (poiché gli operandi sono stringhe). 



Operatori Logici 

Gli operatori logici convertono i loro operandi in stringhe di 16 bit, 
con segno, usando la rappresentazione intera complemento a due 
nell'intervallo da -32768 a +32767. Quando gli operandi si trovano fuori 
da questo intervallo si verificherà un errore. 

L'operazione data viene svolta su questi numeri interi dove ogni bit del 
risultato è determinato dai bit corrispondenti dei due operandi. 

Gli operatori logici sono elencati nella tabella qui di seguito, 
denominata "tabella di verità". Descrive graficamente i risultati delle 
operazioni logiche su ogni bit degli operandi. Ogni possibile combina- 
zione di bit è inclusa nella tabella. 

Si noti che i due operatori XOR ed EOV sono l'uno l'esatto contrario 
dell'altro. 



A 


NOT A 


A 


B 


A ANO 8 


A OR B 


A XOR 


B 


A EQV B 


A 1MP B 


1 


0 


1 


1 


1 


1 


0 




1 


1 


0 


1 




0 


0 


1 


1 




0 


0 






i 


1 


0 


1 


1 




0 


1 








3 


0 


0 


0 




1 


1 



"abella 6-1 Tabella di verità 
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Livello di Priorità degli Operatori Logici 



Nello svolgimento di un'espressione vengono prima eseguite le operazioni 
numeriche e di confronto, e successivamente quelle logiche. 

La tabella che segue riporta gli operatori logici nell'ordine di priori- 
tà in cui essi vengono svolti dal linguaggio BASIC. 



OPERATORI 


LIVELLO DI PRIORITÀ' 


NOT 


IL PIÙ ' ALTO 


AND 




OR 




XOR 




IMP 




EQV 


IL PIÙ ' BASSO 



Tabella 6-2 Priorità degli Operatori Logici 



Esempi 

Consideriamo alcuni esempi. Prima di tutto assegneremo dei valori alle 
variabili X, Y e Z. 



VIDEO 


COMMENTI 


X%=0 


il BASIC esegue le assegnazioni 


Ok 


indicate 


Y%=3 




Ok 




Z%=5 




Ok 




?X%<Y% AND Z%=3 


il risultato è falso (0), poiché 


0 


X%<Y% è vero (-1) ma Z%=3 è 


Ok 


falso (0) 


?X% OR *%<Z% 


il risultato è vero (-1), poiché 


-1 


X% è falso (0) ma X%<Z% è vero 


Ok 


(-1) 



► - 



6-14 



LINGUAGGIO BASIC - MANUALF r.FNFRAL E 



ESPRESSIONI 



?t3 Awn 1 A 
:00 fllNU IO 

16 
OK 


il risultato è 16, poiché 

63 = 111111 (in binario) 
16 = 010000 (in binario) 


?4 OR 2 
6 


il risultato è 6, poiché 


Ok 


4 = 100 (in binario) 
2 = 010 (in binario) 

1 1 fi 
110 


?-1 OR -2 

-1 

Ok 


il ri cui ta*p a — 1 nnifhp 
11 l IbUlLdLU e -I , pulsile 


-1 = 1111111111111111 (in binario) 

1 1111111111111111) 1 1 rx kinirint 

-e = llllinitllll 110 (in binano) 
1111111111111111 


?0<2 AND 4=4 

-1 

Ok 


il risultato è vero (-1), poiché 


0 < 2 è vero ( -1 ) , e 
4=4 è vero (-1 ) 


?0 XOR Y%=3 

-1 

Ok 


il risultato è vero (-1), poiché 


0 è falso (0), e 
Y%=3 è vero (-1 ) 


?Z%>Y% ANO NOT "A , '>"B" 
-1 


il risultato è vero (-1), poiché 


Al* 


L\ > Y% e vero \ -1 ì f e 
"A">"B" è falso (0) 

'Iota: E' possibile scrivere due 
operatori di seguito solo a con- 
dizione che il secondo sia un 
operatore NOT. 


Uso delle Espressioni Logiche 





Le espressioni logiche possono essere usate per: 

- controllare una condizione nelle seguenti istruzioni di controllo: 
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IF... GOTO.. .ELSE, 
1F. ..THEN. ..ELSE, 
UH ILE 

Ad esempio, l'istruzione 

50 1F AS>B$ AND B< =C THEN 300 

trasferirà il controllo dell'esecuzione all'istruzione 300 se la con- 
dizione (A$>B$ AND B<=C) è vera (cioè A$ maggiore di B$ e B minore o 
uguale di C). Se la condizione è falsa (cioè A$ minore di B$ o B 
maggiore di C) verrà eseguita l'istruzione successiva. 

- controllare parole (16 bit) per una particolare configurazione di bit. 
Ad esempio, l'operatore AND può essere usato per "mascherare" tutti i 
bit eccetto uno di una status word (parola di stato) associata a un 
buffer di 1/0. L'operatore OR può essere usato per fare il "merge" di 
due parole in modo da creare un determinato valore binario, ad 
esempio: 

-1 AND 8 è 8 
-1 OR 8 è -1 

poiché 

-1 = 1111111111111111 (in binario) 
8 = 0000000000001000 (in binario) 




LIVELLO DI PRIORITÀ' DEGLI OPERATORI 

La seguente tabella elenca tutti gli operatori (numerici, stringa, di 
confronto e logici) nell'ordine di priorità con cui essi vengono 
eseguiti nel linguaggio BASIC. 



OPERATORI 


LIVELLO DI PRIORITÀ' 


A (elevamento a potenza) 
(cambiamento di segno) 
* / (moltiplicazione e divisione) 


IL PIÙ ' ALTO 
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ESPRESSIONI 



\ 


(divisione tra interi) 






MOD 


(divisione modulo ) 






+ — 


(addizione e sottrazione) 








( conca t ena 7 ì one di strinoa) 






Tutti gli 


ODeratori di confronto 






NOT 








AND 








OR 








XOR 








1MP 








EQV 




IL PIÙ" BASSO 





Tabella 6-3 Priorità degli Operatori 
Note 

- gli operatori inclusi nella stessa linea hanno lo stesso livello di 
priorità 

- tutti gli operatori di confronto hanno lo stesso livello di priorità 

- l'ordine di svolgimento delle espressioni può essere modificato me- 
diante l'uso di parentesi. Ad esempio, l'ordine di svolgimento di: 

NOT A>B AND C>0 OR E >F 

è diverso da quello di: 

NOT (A>B AND (OD OR E>F)) 

se ad esempio, A>B è vero, C>D è falso ed E>F è vero, la prima 
espressione è vera, mentri la seconda è falsa. 

- il risultato di una qualsiasi espressione può anche essere un operando, 
così si possono formare espressioni molto complesse, ad esempio 
concatenando due o più espressioni logiche con un operatore logico 
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(come nell'esempio di sopra). Comunque, non è buona norma di 
programmazione scrivere espressioni troppo complesse. 
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LINGUAGGIO BASIC - MANUALE GENERALE 



COME VENGONO EMESSI I DATI IN BASIC 



SOMMARIO 

Abbiamo appena analizzato come introdurre dati nell'M20 e come elaborar- 
li. 

Questo capitolo si propone di illustrare come definire l'ampiezza della 
linea dello schermo e/o della stampante (comando W1DTH) e come ottenere 
i risultati elaborati dal computer. Esamineremo le istruzioni LPRINT, 
PRINT, LPRINT US1NG e PR1NT US1NG. Esse consentono di stampare/visualiz- 
zare i dati in formato standard o in formato definito dall'utente. 



INDICE 

DEFINIZIONE DEL NUMERO DI 7-1 
NULL E DELL'AMPIEZZA DELLA 
LINEA DI OUTPUT 

NULL (PROGRAMMA/IMMEDIATO) 7-1 

UIDTH (PROGRAMMA/IMMEDIATO) 7-2 

FORMATO STANDARD 7-4 

LPR1NT/PR1NT (PROGRAMMA/ 7-4 
IMMEDIATO) 

URITE (PROGRAMMA/IMMEDIATO) 7-10 

FORMATO DEFINITO DALL'UTENTE 7-12 

LPRINT USING/PR1NT US1NG 7-12 
(PROGRAMMA/IMMEDIATO) 





COME VENGONO EMESSI I DATI IN BASIC 



DEFINIZIONE DEL NUMERO DI NULL E DELL'AMPIEZZA DELLA LINEA DI OUTPUT 

Le istruzioni NULL e W1DTH, che possono anche essere utilizzate in un 
programma, consentono di stabilire rispettivamente il numero di nuli 
stampati dopo ogni linea e l'ampiezza massima della linea del video e 
della stampante. 

Nuli è il primo carattere della tabella ASCII: non ha un equivalente 
grafico e corrisponde al codice decimale 0 (v. Appendice A). 



Stabilisce il numero di nuli che devono essere stampati alla fine di 
ogni linea. 




NULL (PROGRAMMA/IMMEDIATO) 




Figura 7-1 Comando NULL 



L sempio 



SE l'utente imposta... 



ALLORA... 



NULL 2 HI 



alla fine di ogni linea saranno 
stampati 2 nuli 



Nota : L'espressione numerica viene 
arrotondata al numero intero più 
vicino. 



Nel caso di nastri perforati a 10 
caratteri per secondo, il valore 
dell'espressione dovrebbe essere 
>=3. Ciò consente anche di iden- 
tificare le linee sul nastro. 



► 
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11 valore dovrebbe essere 0 oppure 

1 nel caso di telescriventi tele- 
type o CRT teletype compatibile. 
11 valore dovrebbe essere uguale a 

2 oppure a 3 per stampanti hard- 
copy da 30 caratteri per secondo. 



WlDTH (PROGRAMMA/ IMMEDIATO) 



Definisce l'ampiezza massima della linea del video o della stampante, 
per gli output ottenuti usando le istruzioni PR1NT/WR1TE , LPR1NT, PR1NT 
U51N6 e LPR1NT US1NG o quando viene emesso un messaggio d'errore. 




Figura 7-2 Comando WlDTH 



Valore di Default 

Quando non si usa il comando WlDTH il sistema assume un'ampiezza di 
linea dello schermo di 64 caratteri. 

Allo stesso modo, se non si usa il comando WlDTH LPR1NT, il sistema 
assume un'ampiezza di linea della stampante di 132 caratteri. 



Esempio 

10 PR1NT "ABCDEFGH1JKLMN0PQRSTUVWXYZ" 
RUN 

ABCDEFGH1 JKLMNOPQRSTUVWXYZ 
Ok 

WlDTH 18 

Ok 

RUN 

AB CDEF GH I JKLMNOPQR 

STUVWXYZ 

Ok 
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COME VENGONO EMESSI I DATI IN BASIC 



Caratteristiche 



SE... 

si omette l'opzione 
LPRINT 



si fa uso del co- 
mando LPRINT 



il valore dell'espres 
sione numerica non è 
un numero intero 



ALLORA... 

si definisce l'ampiezza della linea del video 

si definisce l'ampiezza della linea di stampa. 

Per esempio: 

10 W1DTH LPRINT 4 

20 LPRINT "AAAABBBBCC" 

RUN 

Ok 



AAAA 
B3BB 

CC 



viene arrotondato all'intero più vicino e deve 
avere un valore compreso tra 15 e 255. 

Se il valore arrotondato è 255, l'ampiezza della 
linea è "infinita" e cioè il BASIC non esegue il 
ritorno a capo. Nondimeno la posizione del 
cursore e della testina stampante determinata 
dalle funzioni POS e LPOS ritorna a zero quando 
si supera la posizione 255. 

Se il valore arrotondato è maggiore di 255, vie- 
ne emesso un messaggio d'errore (lllegal func- 
tion cali) 
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FORMATO STANDARD 



Le istruzioni PR1NT, WRITE e LPRINT consentono di visualizzare (PR1NT e 
URITE) oppure stampare (LPRINT) i risultati dei calcoli in un formato 
standard. Esse sono importanti istruzioni di programma, ma possono anche 
essere usate come istruzioni immediate. 

Se si desidera includere in una linea i risultati di due o più espres- 
sioni, queste ultime devono essere separate da una virgola (WRITE), da 
una virgola o da un punto e virgola (PR1NT, LPRINT). 

Con l'istruzione WRITE i dati visualizzati verranno separati, l'uno 
dall'altro, da una virgola, mentre le stringhe saranno delimitate da 
virgolette. Con le istruzioni PR1NT e LPRINT, l'uso della virgola 
"separa" i risultati (mediante l'introduzione di spazi), mentre il punto 
e virgola li "ravvicina" e le stringhe non saranno più delimitate da 
virgolette. 



LPRINT/PR1NT (PROGRAMMA/IMMEDIATO) 




Le istruzioni LPRINT e PR1NT consentono rispettivamente di stampare e 
visualizzare i dati secondo un formato standard. 

E' possibile usare un punto interrogativo (?) al posto dell'istruzione 
PR1NT. 




Figura 7-3 Istruzione LPRINT 
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COME VENGONO EMESSI I DATI IN BASIC 




SE... 



ALLORA... 



l'istruzione LPR1NT 
(oppure PRINT) non 
termina con una 
virgola o un punto 
e virgola 



1 'istruzione L PRINT 
(oppure PRINT) non 
contiene alcuna e- 
spressione 



quando l'istruzione viene eseguita, viene gene- 
rata una successiva linea di dati. 

Ad esempio: 

LIST 

10 PRINT 1 
20 PRINT 2 
Ok 
RUN 

1 

2 
Ok 

viene saltata una linea, consentendo in questo 
modo di generare spazi tra linee di dati. 

Ad esempio: 

LIST 

10 PRINT 1 
20 PRINT 
30 PRINT 2 
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Il 01 
RUN 
1 





2 

UK 


• • 

le espressioni nella 


noni valore viene stamoato (o visualizzato) 


usta ai output sono 


allineato a sinistra in una delle "zone" di 


separate da una vir- 


stampa in cui ogni linea è divisa (ogni zona è 


goia 


coniDOsta da 14 Dosizioni). 




Ad esempio: 




LIST 




10 A$ = "For June..." 




20 X = .353 




30 PR1NT "Results", AS, X 




Ok 




RUN 




Results For June... .353 




Ok 



Nota : Ad ogni valore positivo (in questo caso 
.353) viene anteposto uno spazio (vedere in 
seguito) . 

Si noti anche che il numero delle zone di stampa 
dipende dal numero massimo di caratteri che può 
contenere. Ciò può essere stabilito mediante il 
comando W1DTH o assunto per default. 



la lista delle e- 
spressioni contiene 
molti dati 



1 valori stringa visualizzati (o stampati con 
LPRINT) non sono delimitati da virgolette. 



possono essere generate due o più linee di dati. 
Ad esempio: 



W1DTH 31 
Ok 

PR1NT 1, 1+2, 2+3, 7, 9, "ABCD" 
1 3 
5 7 
9 ABCD 

Ok k. 
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Nota : Ad ogni valore positivo viene anteposto 




uno spazio (vedere seguito) 


un ' i ctrii7inno 1 PD1MT 


srl Anni usi nra r» 4~ ^ rr> ^ t~ u 1 r~ i i 1 ^ ~* ~» — i "4~ r\ i * i a n a 

— au ogni valore stampato o visualizzato viene 


(oppure PR1NT) con- 


aggiunto in coda uno spazio 


tiene una o più e- 




spressioni numeriche 


- ad ogni valore positivo è anteposto uno spazio 




- ad ogni valore negativo viene anteposto il 




segno meno 




- ogni valore in semplice precisione viene 




rappresentato in formato a virgola fissa se la 




rappresentazione in tale formato può avvenire 




con 6 oppure meno di 6 cifre con la stessa 




accuratezza del formato a virgola mobile (o 




esponenziale) 




- ogni valore in doppia precisione viene rappre- 




sentato in formato a virgola fissa se la 




rappresentazione in tale formato può avvenire 




con 15 oppure meno di 15 cifre con la stessa 




accuratezza del formato a virgola mobile (o 




esponenziale) 




Ad esempio: 




nn i ut ^ si k f 

PR1NT 10A-6 

ri r\ rt fX ri ^ 




.000001 

Ok 




PR1NT 10A-7 




1E-07 




ni. 
Ok 




□DiMT in n ir\ ia 




(A (A (A (A (A (A (A (A (A (A (A (A (A d'i in i < 




Ok 




Nota : il secondo valore viene visualizzato 




allineato a sinistra nella terza zona di stampa 




poiché il primo valore supera 1 ampiezza della 




w ' imo c\ji>a Ui a Ldi'iUd 


l'ultima espressione 


una successiva operazione di PRINT (LPRINT) o 


della lista è seguita 


INPUT visualizza o stampa il successivo caratte- 


da una virgola 


re o cifra nella stessa linea (all'inizio della 




successiva zona di stampa), sempre che ci sia 



spazio sufficiente; in caso contrario, esso sarà 
stampato o visualizzato nella linea successiva. 



l'ultima espressione 
della lista è seguita 
da un punto e virgola 



si inseriscono più 
virgole in successione 



Ad esempio: 
LIST 

10 AS = "For July..." 
20 X = .491 

30 PR1NT "Results", AS, 

40 PR1NT X 

Ok 

RUN 

Results 



For July... .491 



una successiva operazione di PR1NT/LPR1NT o 
INPUT visualizza o stampa il successivo caratte- 
re o cifra nella stessa linea iniziando dalla 
posizione del cursore (o della testina di 
stampa) sempre che ci sia spazio sufficiente 
sulla linea. In caso contrario, esso sarà 
visualizzato/stampato nella linea successiva. 

Ad esempio: 

LIST 

10 INPUT X 

20 PR1NT X "SOUARED 1S" X A 2 "AND"; 

30 PR1NT X "CUBED IS" X A 3 

40 PR1NT 

50 GOTO 10 

Ok 

RUN 

? 9 

9 SOUARED 1S 81 AND 9 CUBED 1S 729 
? 21 

21 SOUARED 1S 441 AND 21 CUBED 1S 9261 



l'uso di ogni virgola fa sì che la testina di 
stampa o il cursore si posizioni all'inizio 
della successiva zona di stampa. 

L'uso delle virgole consente quindi di ottenere 
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una anpia spaziatura nella visualizzazione o 




stampa dei dati. 




Ad esempio: 




PR1NT "M",,"N" 




M N 




Ok 


si usano punti e 


la spaziatura dei valori visualizzati o stampati 


virgola o spazi al 


è più compatta. L'esatta spaziatura dipende 


posto delle virgole 


dal numero di cifre o caratteri di ogni valore. 


per separare le 


L'uso di punti e virgola consente quindi di 


espressioni della 


stampare o visualizzare un numero maggiore di 


lista 


valori in ogni linea. 




L'introduzione di più di uno spazio (o punto e 




virgola) tra due espressioni, avrà lo stesso 




effetto dell'introduzione di un solo spazio (o 




di un solo punto e virgola). 




Ad esempio: 




LIST 




10 Al = 1000 




20 A2 = 2000 




30 A3 = 3000 




40 A4 s 4000 




50 A5 = 5000 




60 A6 = 6000 




70 A7 = -7000 




80 PR1NT A1 ;A2;A3;A4;;A5 A6 A7 




Ok 




RUN 




1000 2000 3000 4000 5000 6000 -7000 




Gli spazi, che compaiono tra i numeri, sono 




dovuti al fatto che il sistema aggiunge uno 




spazio dopo ogni numero ed elimina il segno 




implicito "più" che precede ogni valore positi- 




vo, sostituendolo con uno spazio. 



► 
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1 

si introducono con- 


è possibile identificare ogni risultato e 


temporaneamente vir- 


ottenere una spaziatura appropriata nell'ambito 


gole e punti e vir- 


di una linea. 


gola nella stessa 




istruzione LPR1NT 


Ad esempio: 


(oppure PR1NT) 






LIST 




10 INPUT "Base e Altezza"; B,H 




20 PRINT "Area=";B*H,"Base=";8,"Altezza=";H 




30 GOTO 10 








RUN 




Base e Altezza? 1 .2,3 




Area= 3.6 Base= 1.2 Altezza= 3 




Base e Altezza? A C 




Break in 10 




Ok 


si usa la funzione 


si determina l'esatta posizione sulla linea in 


speciale di sistema 


cui si dovrà posizionare la testina di stampa (o 


TAB 


il cursore) per iniziare la stampa o la 




visualizzazione dei dati. 




Ad esempio: 




PRINT 1 ; TAB(6); 2 




1 2 




Ok 


si usa la funzione 


viene inserito il numero specificato di spazi 


speciale di sistema 


sulla linea. (Nel calcolare il numero di spazi 


SPC 


desiderati, bisogna tener conto che i dati 




numerici sono sempre seguiti da uno spazio). 




Ad esempio: 




PRINT 1 ; SPC(6); 2 




1 2 




Ok 



URITE (PROGRAMMA/IMMEDIATO) 

Visualizza una lista di dati. Ogni elemento visualizzato è separato dal 
precedente da una virgola. Le stringhe sono delimitate da virgolette 
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("). Il BASIC esegue un ritorno a capo/interlinea dopo la visualizzazio- 
ne dell 'ultimo dato. 




Figura 7-5 Istruzione URITE 



Dove 

1' espressione può essere numerica, di confronto, logica o stringa. Se 
non si indica una espressione, l'istruzione URITE esegue una interlinea. 



I- s empio 



VIDEO 


COMMENTI 


10 A=80 : B=90 


quando si esegue un'istruzione 


20 CS="THAT'S ALL" 


WRITE ogni dato è separato da 


30 WRITE A,B,C$ 


quello precedente da una virgola, 


RUN 


e le stringhe sono racchiuse tra 


80, 90, "THAT'S ALL" 


vi rgolette. 


Ok 






Nota: L'istruzione WRITE visualiz- 




za valori numerici usando lo 




stesso formato dell'istruzione 




PR1NT, ma tali valori non saranno 




seguiti da spazi. 
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FORMATO DEFINITO DALL'UTENTE 



Come abbiamo già visto, l'uso di virgole, punti e virgola, stringhe tra 
virgolette e delle funzioni SPC e TAB consente un controllo limitato del 
formato dei dati stampati o visualizzati. Le istruzioni LPR1NT US1NG e 
PRINT US1NG consentono invece di avere un completo controllo del formato 
dei dati stampati o visualizzati. 

Generalmente tali istruzioni sono utilizzate in un programma ma possono 
anche essere usate come istruzioni immediate. 



LPR1NT US1NG/PR1NT US1NG (PROGRAMMA/IMMEDIATO) 




Le istruzioni LPR1NT US1NG e PRINT US1NG consentono rispettivamente di 
stampare e di visualizzare una lista di dati secondo un formato definito 
dall 'utente. 

Le espressioni che compaiono in queste istruzioni possono essere sepa- 
rate da una virgola (,) o da un punto e virgola (;). Non è rilevante se 
si usa la virgola o il punto e virgola come separatore. 1 valori saranno 
stampati o visualizzati secondo il formato specificato dall'espressione 
stringa che compare dopo US1NG. Questa espressione può essere una 
costante o una variabile stringa contenente speciali caratteri di 
formattazione. Tali caratteri determinano il campo ed il formato delle 
stringhe o dei numeri stampati o visualizzati. 




Figura 7-6 Istruzione LPRINT US1NG 
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Figura 7-7 Istruzione PR1NT US1NG 



Dove 



ELEMENTO Di SINTASSI 


SIGNIFICATO 


string expression 


stringa di caratteri di formattazione (vedere in 
seguito) o variabile stringa, comprendente una 
stringa di caratteri di formattazione 


expression 


espressione numerica, di confronto, logica o 
stringa che deve essere stampata o visualizzata 


Visualizzazione o stampa di stringhe 

E' possibile usare uno dei tre seguenti caratteri di formato: 


CARATTERE DI 
FORMATO 


SIGNIFICATO 




Specifica che solo il primo carattere di una 
stringa deve essere stampato o visualizzato. 

Ad esempio; 

LIST 

1» AS="UATCH M 
20 8S="0UT" 
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'\n spazi \" 



30 PRINT USING "!";AS;BS 

Ok 

RUN 

uo 

Ok 

specifica che i primi 2+n caratteri della 
stringa devono essere stampati o visualizzati. 
Se le barre rovesce non contengono spazi, 
verranno stampati o visualizzati due caratteri. 
Se contengono uno spazio, i caratteri stampati 
(visualizzati) saranno tre, e così via. Se la 
stringa è più lunga del campo, i caratteri 
eccedenti saranno ignorati. Se invece il campo è 
più lungo della stringa, la stampa (visualizza- 
zione) della stringa inizierà dalla sinistra e 
sarà completata con spazi sulla destra. 



Ad esempio: 
LIST 

10 AS="L00K" 
20 BS="0UT" 

30 PR1NT US1NG "\ \";AS;BS 
40 PRINT US1NG "\ \";AS;BS 
Ok 
RUN 

L00K0UT 
LOOK OUT 



"8" specifica un campo stringa a lunghezza varia- 

bile. Quando il campo viene specificato con "8" 
la stringa verrà stampata esattamente come essa 
viene introdotta. 

Ad esempio: 

LIST 

10 AS="L00K":BS="0UT" 

20 PRINT US1NG "!";A$i 

30 PRINT US1NG "8";B$ 

Ok 

RUN 

LOUT 

Ok 
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Visualizzazione e Stampa di Numeri 

E' possibile usare i seguenti caratteri di formato: 



CARATTERE DI 
FORMATO 

# 



SIGNIFICATO 



un simbolo di numero ("number sign") viene usato 
per rappresentare la posizione di ogni cifra. Le 
posizioni di cifra sono sempre sostituite da 
cifre o da spazi. Se le cifre che devono essere 
stampate/visualizzate sono inferiori al numero 
delle oosizioni specificate, il numero sarà 
allineato a destra e sarà preceduto da spazi. 



Ad esempio: 

PR1NT USING "####";9° Q-| 
99 

Ok 



è possibile inserire un punto decimale in ogni 
posizione del campo. Se la stringa di formato 
indica che una cifra precede il punto decimale, 
tale cifra sarà stampata/visualizzata solo se 
divèrsa da zero. Quando risulti necessario, i 
numeri sono arrotondati. 

Ad esempio: 

PR1NT USING "###.##";. 78 WSM 
.78 

Ok 

PRINT USING 'W.##";987.654 EM 

987.65 

Ok 

PR1NT USING ";10., 5. 3, 66. 789,. 234 Bl 

10.00 5.30 66.79 .23 

Ok 

Nell'ultimo esempio, alla fine della stringa di 
formato sono stati inseriti tre spazi per 
separare i valori visualizzati nella linea. 
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Un segno più all'inizio o alla fine della 
stringa di formato farà sì che il segno del 
numero (più o meno) venga visualizzato/stampato 
prima o dopo il numero. 



Ad esempio: 



PRINT US1NG "+##.## ";-68.95,2.4,55.6,-.9 Bl 

-68.95 +2.40 +55.60 -.90 

Ok 

Nota : Per la sola visualizzazione del segno meno 
(e non del segno più), all'inizio del numero si 
dovrà iniziare la stringa di formattazione 
inserendo un simbolo di numero (#) in più. 

Ad esempio: 

PR1NT US1NG "M#M"; -68. 95, 60. 95 Bl 
-68.95 68.95 

un segno meno alla fine del campo di formato 
farà sì che i numeri negativi stampati/visua- 
lizzati siano seguiti dal se'no meno. 



Ad esempio: 



PRINT US UIC ";-68.95,22.449,-7.01 H:l 

60.95- 22.45 7.01- 

Ok 



un doppio asterisco all'inizio della stringa di 
formato fa sì che gli spazi iniziali di un campo 
numerico siano occupati da asterischi. 11 
simbolo ** indica anche due ulteriori posizioni 
di cifra. 



Ad esempio: 



PRINT US IMG "**#.# ";12. 39, -0.9, 765.1 WtìM 

*12.4 **-.9 765.1 

Ok 
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SS 



Un doppio segno di dollaro fa sì che un segno di 
dollaro conpaia alla immediata sinistra del 
numero formattato. Il segno SS specifica due 
ulteriori posizioni di cifra, una delle quali è 
occupata dal segno di S. 11 carattere SS non può 
essere usato con il formato esponenziale(AAAA) o 
con numeri negativi a meno che l'ultimo caratte- 
re della stringa di formato sia un segno meno 
(appare il segno del numero sulla destra se 
negativo) o un segno più (appare sempre il segno 
del numero sulla destra). 



Ad esempio: 

PR1NT US1NG "SS###.##-";-456.78 PEI 

$456.78- 
Ok 



il segno **$ situato all'inizio di una stringa 
di formato combina gli effetti dei due simboli 
appena descritti. Gli spazi iniziali saranno 
occupati da asterischi, ed un segno di S verrà 
inserito immediatamente prima del numero. 

11 simbolo **$ specifica tre ulteriori posizioni 
di cifra. 

Ad esempio: 



PR1NT US1NG "**$»#.## ";2.34 HI 

***$2.34 

Ok 



una virgola collocata alla sinistra del punto 
decimale in una stringa di formato fa sì che una 
virgola venga visualizzata/stampata alla sini- 
stra di ogni terza cifra nell'ambito della parte 
intera del numero. Una virgola situata alla fine 
della stringa di formato viene visualizza- 
ta/stampata come parte della stringa. Il simbolo 
della virgola nette a disposizione un'altra 
posizione di cifra. L'inserimento della virgola 
non esercita alr.un effetto nell'ambito di un 
formato esponenziale (AAAA). 

Ad esempio: 
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PR1NT US1NG " #»#»,.#» ";1234.5 I£I 

1,234.50 

Ok 

PR1NT USING "Utm.ttlt, ";1234. 5 MÌM 

1234.50, 

Ok 



il formato esponenziale può essere specificato 
inserendo quattro simboli dell'esponente dopo i 
caratteri che specificano la posizione delle 
cifre. Tali simboli permettono di generare lo 
spazio per la visualizzazione/stampa di E+xx. E' 
possibile specificare qualsiasi posizione del 
punto decimale. 

Le cifre significative sono allineate a sinistra 
e l'esponente viene modificato in consequenza. A 
meno che venga specificato un segno iniziale di 
+ oppure un segno finale di + oppure di -,una 
posizione di cifra verrà utilizzata alla sini- 
stra del punto decimale per stampare/visualizza- 
re uno spazio oppure un segno meno. 

Ad esempio: 

PR1NT US1NG "##.#M/\/\/\";234.56 EM 

2.35E+02 
Ok 

PRINT USING ".»«## A/\/\A"; 888888 EHM 

.8889E+06 

Ok 

PRINT USING M +.fffttWAAAA";123 Bl 

+.1230E+03 

Ok 



un segno di sottolineatura incluso nella stringa 

di formato fa sì che il successivo carattere sia 

visualizzato/stampato così come appare nella 
stringa di formato. 

Ad esempio: 

PRINT USING "_!##.##_!"; 12. 34 WÌ» 

M2.34! 

Ok 
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II carattere visualizzato/stampato così come 
appare nella stringa di formato può consistere 
nello stesso segno di sottolineatura quando si 
include " " nella stringa di formato. 


% 


se il numero che deve essere stampato/visualiz- 




zato è maggiore del campo numerico specificato, 




il ^pono rii oprr pnf 1 p mtnnarirà di frontp al 

il acyiiu u i pici ucniuaic ^uiii^ai 11 a u i i t uiii.c ai 




numprn 1 ' ^rrnt , '^nrla(n»>rit^ fsi ci rho i 1 ni imorri 
i iu mei u • jc i gnu iui luaiiici i iu la — i L>nc il i lume i u 




superi il campo, di fronte ad esso comparirà il 




segno di percentuale. 




Ah pQpmni n • 




PR1NT US1NG " . HH ";111 .22 I&l 




%111 .22 




Ok 




PRÌWT II^TMf " HI "• QQQ Wi ■ 
"Kilil UjlIivj . flfl ,.777 M^.M 




VI. 00 




Ok 




Se il numero delle cifre specificate è superiore 




a 24, si avrà il messaggio d'errore "lllegal 




Function Cali". 
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Nota 



Se in un programma si usa più volte la stessa stringa di formato, 
sarà opportuno assegnare una varibile stringa dei caratteri di format- 
tazione e quindi specificare il nome della variabile stringa al 
posto della stringa di formato. 

Per esempio: 

10 A$=' . » 

20 PR1NT US1NG A$; 8.49 



100 PR1NT US1NG AS;A,B,C 



150 PR1NT US1NG A$;A1,B1 



RUN 
8.49 



0* 
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SOMMARIO 

Di norma le istruzioni BASIC sono eseguite l'una dopo l'altra nell'or- 
dine del numero di linea. A volte però può essere necessario alterare la 
normale sequenza di esecuzione mediante "salti" (branches) che trasferi- 
scono il controllo da un'istruzione ad un'altra parte del programma. 

In questo capitolo vedremo come sia possibile conseguire questo 
risultato tramite salti condizionati o incondizionati e tramite cicli 
( loops) . 



1 NOI Ct 

SALTI (TRASFERIMENTI) 8-1 
INCONDIZIONATI 

GOTO (PROGRAMMA/ IMMEDIATO) 8-1 

ON... GOTO (PROGRAMMA/IMME- 8-3 
D1AT0) 

SALTI (TRASFERIMENTI) 8-4 
CONDIZIONATI 

1F.. .GOTO. ..ELSE/ 8-4 
IF. ..THEN. . .ELSE 
(PROGRAMMA/IMMEDIATO) 

CICLI ITERATIVI (LOOPS) 8-9 

FOR/NEXT (PROGRAMMA/IMME- 8-12 
DIATO) 

WH1LE/WEND (PROGRAMMA/IMME- 8-21 
D1AT0) 





ISTRUZIONI DI CONTROLLO 



SALTI ( TRASF F. R IMFNT I ) INCONDIZIONATI 



I trasferimenti di controllo possono essere condizionati o incon- 
dizionati. L'istruzione GOTO determina un trasferimento incondizionato 
del controllo dell'esecuzione al numero di linea indicato nell'istruzio- 
ne stessa. 11 programma esemplificativo RETTANGOLO! (vedere capitolo 1 e 
2) contiene la seguente istruzione: 



L'istruzione indica all'M20 che la prossima istruzione che deve essere 
eseguita è la 20 al posto di quella immediatamente successiva di numero 
più elevato. 

L'istruzione ON... GOTO, o istruzione calcolata GOTO, rappresenta 
un'altra forma di trasferimento incondizionato. Essa consente di 
trasferire il controllo ad una istruzione scelta tra n specificate in 
base al valore di una espressione numerica. Ad esempio: 

100 ON A GOTO 15, 30, 500 

Questa istruzione indica: se A=1 il controllo è trasferito all'istru- 
zione 15, se A=2 all'istruzione 30, se A=3 all'istruzione 500. Se però 
A<1 oppure A>3 il programma BASIC continua con la prossima istruzione 
eseguibi le . 



Trasferisce il controllo dell'esecuzione alla linea di programma 



80 GOTO 20 




GOTO (PROGRAMMA/IMMEDIATO) 




specificata. 




Figura 8-1 Istruzione GOTO 
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Esempio : 



VIDEO 


rnMMCHTi 
LUnntN I l 


LIST 


L'istruzione 50 trasferisce il 


10 READ R 


controllo incondizionato all'i- 


20 PRINT R = ;R, 


struzione 10 


30 A = 3 . 14'K A ^ 




40 PRINT AREA = ;A 




50 GOTO 10 




60 DATA 5,7,12 




Ok 




RUN 




R = 5 AREA =78.5 




R = 7 AREA = 153.86 




R = 12 AREA = 452.16 




Out of data in 10 




Ok 





Caratteristiche 



SE... 


ALLORA... 


l'utente imposta: 


GOTO viene usato in alternativa a 
RUN. 


GOTO 500 BfJ 


Nota: l'uso dell'istruzione GOTO 


in Stato Comandi 


in Stato Comandi fa si che l'ese- 


E 


cuzione del programma inizi al 


500 è un'istruzione del 


numero di linea specificato senza 


programma residente in 


che venga automaticamente operato 


memoria 


un CLEAR. Ciò consente di asse- 
gnare valori a variabili di pro- 
gramma quando si è in Stato 
Comandi. Questa tecnica può essere 
usata in fase di messa a punto 
(debug) del programma. 


l'istruzione specifi- 


il controllo viene trasferito alla 


cata tramite GOTO 


prima istruzione eseguibile suc- 


non è eseguibile (ad 


cessiva 


es. è una istruzione 




REM) 





► 
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un'istruzione GOTO si 
trova in un ciclo 
(loop) FOR/NEXT 
E 

trasferisce il control- 
lo ad un'istruzione 
esterna al ciclo 



il valore della variabile di 
controllo (vedere FOR/NEXT) è 
l'ultimo valore assunto nell'ambi- 
to del ciclo. 



ON . . . GOTO (PROGRAMMA/IMMEDIATO ) 



Trasferisce il controllo dell'esecuzione di un programma ad una linea 
scelta tra un insieme di linee specificate dopo GOTO, in funzione del 
valore assunto da un'espressione specificata dopo ON. 





expression 












Figura 8-2 Istruzione ON... GOTO 



Caratteristiche 



SE... 



ALLORA. .. 



il programma ha la 
seguente struttura: 



20 INPUT A 

30 ON A GOTO 100,200,300 
40 



A=1 



90 



il valore di A determina a quale 
dei numeri inclusi nella lista 
verrà trasferito il controllo. Se 
ad esempio il valore è uguale a 
tre, il controllo verrà trasferito 
al terzo numero di linea incluso 
nella lista (se il valore di A non 
è un intero, esso verrà arrotonda- 
to al valore intero più vicino). 
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1*100 












1 — ^200 










A 


=3 












1 «-300 










il valore dell'espres- 
sione che segue ON è 
uguale a 0 o maggiore 
dei numeri inclusi 
nella lista (ma in- 
feriore o uguale a 255) 


il controllo viene 
prima istruzione 
ce ss iva 


trasferito alla 
eseguibile suc- 






il valore 
sione che 


dell 'espres- 
segue ON è 


si ha il messaggio 
gal Function Cali 


d'errore "llle- 
' (Richiamo non 





negativo o superiore a 255 Lecito di Funzione) 



SALTI (TRASFERIMENTI) CONDIZIONATI 

In alcuni casi si può desiderare di effettuare il trasferimento del 
controllo dell'esecuzione di un programma a parti diverse dello stesso 
programma a seconda che si verifichino condizioni predefinite. Le 
istruzioni 1F. . .GOTO. . .ELSE e/o 1F . . . THEN. . .ELSE possono essere utiliz- 
zate per verificare tali condizioni e per decidere come effettuare il 
trasferimento . 



. . .GOTO. . .ELSE/1F. . .THEN. . .ELSE (PROGRAMMA/IMMEDIATO) 




Entrambe le istruzioni effettuano il trasferimento condizionato ad una 
istruzione specificata. 

Come è possibile notare attraverso la sintassi, l'istruzione 1F... 
THEN... ELSE è la più potente, poiché consente di introdurre una serie di 
istruzioni sia dopo THEN che dopo ELSE. 
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Figura 0-3 Istruzione 1F. . .GOTO. . .ELSE 




Figura 8-4 Istruzione IF. . .THEN. . .ELSE 



Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


condition 


può essere una espressione: 




- numerica 




- di confronto 




- logica 




Nota: 11 BASIC determina se la condizione è vera 




o falsa controllando se il suo risultato 




(numerico) é diverso da zero (condizione vera) o 




uguale a zero (condizione falsa). Per questo 




motivo è possibile verificare se il valore di 




una variabile è uguale a zero o diverso da zero, 

1 
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specificando semplicemente il nome della varia- 
bile come "condizione". 



E' possibile inserire una virgola prima del THEN. 



Caratteristiche 


.... 


ALLORA... 


la condizione è vera 


il controllo viene trasferito 
0 

all'istruzione il cui numero di linea viene 
specificato dopo GOTO (o THEN) 
OPPURE 

alla prima istruzione specificata dopo THEN 


la condizione è falsa 
E SE 

viene omessa la clau- 
sola ELSE 


il controllo viene trasferito alla prossima 
istruzione eseguibile che segue l'istruzione 
IF...G0T0 oppure IF...THEN 


la condizione è falsa 


il controllo viene trasferito 



E SE 0 
la clausola ELSE è all'istruzione il cui numero di linea viene 

presente specificato dopo ELSE 



OPPURE 

alla prima istruzione specificata che segue 
ELSE. 

Nota : Dopo aver eseguito l'istruzione (o le 
istruzioni) che fanno seguito ad ELSE, il 
controllo viene trasferito alla prossima istru- 
zione eseguibile 
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Esempi 



VIDEO 



COMMENTI 



LIST 

18 REM 1F GOTO test program 
INPUT X% 

IF X%> =10 GOTO 60 
40 PR1NT "1F GOTO failed the test" 
50 GOTO 99 

'IF GOTO passed the test" 



20 
30 



60 PR1NT 
99 GOTO 20 
Ok 
RUN 
? 10 

IF GOTO passed the test 
? 2 

IF GOTO failed the test 

? A C 

Break in 20 
Ok 



is an integer" 
is not an integer" 



LIST 

10 INPUT X 
20 IF X=1NT(X) 

THEN PR1NT X 

ELSE PR1NT X 
30 IF X=9999 THEN END ELSE 10 
Ok 
RUN 
? 1 

1 is an integer 
? 1.5 

1.5 is not an integer 

? A C 

Break in 10 
Ok 



50 IF I THEN A=1000 



se si introduce 10 la condizione 
dell'istruzione 30 (X%>=10) è vera 
e quindi il controllo viene tra- 
sferito all'istruzione 60. Se si 
introduce 2 la condizione è falsa 
e quindi il controllo viene tra- 
sferito all'istruzione 40 



se si introduce 1 , la condizione 
(X=1NT(X)) indicata nell'istruzio- 
ne 20, è vera e quindi il control- 
lo viene trasferito all'istruzione 
PR1NT che segue THEN. Se invece si 
introduce 1.5 la condizione è 
falsa ed il controllo è trasferito 
all'istruzione PR1NT che segue 
ELSE. 

Nota : l'istruzione 20 è una sola 
linea logica divisa in tre linee 
fisiche. 



il valore 1000 viene assegnato 
alla variabile A se I non è uguale 
a zero 
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70 IF (1< 35» AND (I >5) THEN 

A=B+C:GOTO 350 
80 PRINT "OUT OF RANGE" 



si controlla se il valore di I è 
maggiore di 5 e minore di 30. Se I 
si colloca in quest'ambito, si 
calcola il valore della variabile 
A ed il controllo viene poi 
trasferito all'istruzione 350. In 
caso contrario, l'esecuzione con- 
tinua con la linea 80 



Istruzioni 1F Nidificate (Nested) 

Le istruzioni 1F ... GOTO ... ELSE oppure 1F. . .THEN. .. ELSE possono essere 
nidificate. Tale processo trova un limite solo nella lunghezza di una 
linea BASIC (255 caratteri). Ad esempio: 



SE. .. 


ALLORA. .. 


si digita: 
IF X>Y THEN 


PRINT "GREATER" 


la linea introdotta è una istru- 
zione lecita (in questo caso è una 



ELSE IF Y>X THEN PRINT "LESS THAN" sola linea logica divisa in tre 
ELSE PRINT "EQUAL" HI linee fisiche) 



l'istruzione non contiene lo stesso ogni ELSE viene associato con il 
numero di clausole ELSE e THEN più prossimo THEN non ancora 

associato a una clausola ELSE. Ad 

esempio: 

100 IF A=B THEN IF B=C THEN 

PRINT "A=C" 

ELSE PRINT "AOC" 

110... 

Verrà visualizzato A=C quando A=B 
e B=C; verrà vizzualizato AoC 
quando A=B ma B diverso da C. 
Se A diverso da B si passa 
all'istruzione 110. 
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Controllo di un Valore Espresso in Virgola Mobile 



SE. .. 




ALLORA. .. 


si utilizza un'istruzione 
1F... GOTO... ELSE, oppure 
1F. . .THEN. . .ELSE per con- 
trollare il risultato di un 
calcolo in virgola mobile 




poiché la rappresentazione interna 
del valore non può essere esatta, 
il controllo viene effettuato 
nell'ambito del grado di accura- 
tezza definito. 

Per controllare ad esempio se la 
variabile A è uguale a 1.0 si 



1F ABS(A-1.0)<1.0E-6 GOTO... 
oppure 

1F ABS(A-1.0)<1.0E-6 THEN... 

Questo controllo risulterà vero se 
il valore di A è uguale ad 1.0 con 
un errore relativo inferiore a 
1 . 0E-6 



CICLI ITERATIVI (LOOPS) 

L'esecuzione ripetuta di una serie di istruzioni viene definita con il 
termine di loop (ciclo iterativo). 

Ciò può essere ottenuto mediante le istruzioni: 

- FOR e NEXT, che possono essere usate per racchiudere una serie di 
istruzioni, consentendo di ripeterle un numero specificato di volte 

- WHILE e WEND, che possono essere usate per racchiudere una serie di 
istruzioni, consentendo di ripeterle finché una determinata condizione 
risulta vera. 
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Come un Loop può Semplificare il Vostro Problema 

Si supponga di voler visualizzare una lista dei numeri da 1 a 25 
contemporaneamente alla loro radice quadrata. Ciò può essere ottenuto 
con gradi di efficienza via via maggiori. 

11 metodo più primitivo è quello di introdurre le seguenti istruzioni: 

10 PR1NT 1 ,SQR(1 ) 
20 PrUNT 2,SQR(2) 
30 PR1NT 3,SQR(3) 



e così via, per terminare con: 

240 PR1NT 24,SQR(24) 
250 PR1NT 25,S0R(25) 
260 END 

Una soluzione migliore può essere ottenuta mediante l'uso dell'istru- 
zione IF...THEN 

10 LET A=1 

20 PRINT A,SQR(A) 

30 LET A=A+1 

40 IF A<26 THEN 20 

50 END 

E' possibile semplificare ulteriormente il processo usando il loop 
FOR/NEXT 

10 FOR A=1 TO 25 
20 PRINT A.SQR(A) 
30 NEXT A 
40 END 

Quest'ultima semplificazione può sembrare a prima vista di scarso rilie- 
vo. Nondimeno le utilizzazioni di questo loop sono sorprendenti così 
come potrà risultare dall'esame di alcune possibilità del suo impiego 
che verranno presentate in seguito. 
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L'inizio del Loop - L'istruzione FOR 

Le istruzioni FOR e NEXT identificano rispettivamente l'inizio e la fine 
di un loop. FOR specifica quante volte il loop, e cioè l'istruzione o la 
sequenza delle istruzioni comprese tra FOR e NEXT devono essere 
eseguite. 

Nell'esempio precedente FOR specifica che l'istruzione PR1NT deve essere 
eseguita per valori successivi di A compresi tra 1 e 25 (il valore di A 
viene incrementato di 1 dopo l'esecuzione di ogni PR1NT). Quando il 
valore di A supera 25, l'esecuzione del loop termina, ed il controllo 
passa alla prima istruzione successiva all'istruzione NEXT. In questo 
caso si tratta dell'istruzione END, che sta ad indicare il completamento 
del programma. 

L'indicazione A=l TO 25 definisce l'insieme dei valori presi in consi- 
derazione per eseguire il loop. In questo contesto A è denominata 
variabile di controllo, poiché controlla quante volte il loop deve 
essere eseguito. La variabile di controllo subisce sempre incrementi 
pari ad 1 , a meno che l'istruzione FOR non specifichi diversamente. E' 
possibile difatti incrementare la variabile di controllo di un valore 
diverso da 1. Ciò si ottiene aggiungendo la clausola STEP. 



Ad esempio: 



10 FOR A=l TO 25 STEP 2 



Questa istruzione indica che la variabile di controllo subirà un 
incremento (o step) di 2. Il loop verrà quindi eseguito per ogni valore 
dispari di A compreso tra 1 e 25 (e cioè 1,3, 5... 25). Quando il valore 
di A supera 25 (e cioè quando raggiunge 27) l'esecuzione del loop 
termina. 11 valore di A sarà quindi 27 prima che venga eseguita 
l'istruzione che segue l'istruzione NEXT. 

Se si desidera invece eseguire il loop per i valori pari di A compresi 
tra 1 e 25, ciò può essere ottenuto specificando: 



10 FOR A=2 TO 25 STEP 2 



Anche in questo caso quando il valore di A supera 25 (cioè raggiunge 26) 
l'esecuzione del loop termina. 

E' possibile esplicitare, anche se non è necessario, un valore dell'in- 
cremento pari a 1 . Ad esempio: 

80 FOR X=1 TO 40 STEP 1 
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Come nel caso delle espressioni contenute nelle istruzioni LET e PR1NT i 
parametri dell'istruzione FOR possono essere molto complessi. Ognuna 
delle seguenti istruzioni, ad esempio, è valida: 

70 FOR A=B TO C 

80 FOR X=8/M+N TO A A 2 

50 FOR 1=SQR(A) TO 1550 5TEP B*C+6 

Se il valore di un incremento è negativo, il ciclo FOR/NEXT è eseguito 
finché il valore della variabile di controllo non è minore del valore 
finale (cioè il valore espresso dopo la parola TO). 

Ad esempio: 

LIST 

10 FOR K%=1 TO -10 STEP -1 

20 PR1NT K%; 

30 NEXT K% 

Ok 

RUN 

10-1-2 -3 -4 -5 -6 -7 -8 -9 -10 
In questo caso il ciclo viene ripetuto 12 volte. 



11 Tergine del Ciclo Iterativo - L'istruzione NEXT 

Così come il loop inizia sempre con un'istruzione FOR, esso termina 
sempre con un'istruzione NEXT. Si ricordi che tale ciclo comprende tutte 
le istruzioni incluse tra le istruzioni FOR e NEXT. 

L'istruzione NEXT inizia con la parola chiave NEXT, alla quale può 
seguire una lista di nomi di variabili di controllo. Ogni variabile di 
controllo nell'istruzione NEXT deve avere lo stesso nome della variabile 
di controllo della corrispondente istruzione FOR. Più istruzioni FOR 
possono essere associate a una sola NEXT (si veda in seguito Nested 
Loops (Cicli Nidificati)). 



FOR/NEXT (PROGRAMMA/ IMMEDIATO) 




Le istruzioni FOR/NEXT consentono di eseguire in loop una serie di 
istruzioni per un certo numero di volte. 
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ISTRUZIONI DI CONTROLLLO 



Figura 8-5 Istruzione FOR 




Figura 8-6 Istruzione NEXT 



Dove: 



ELEhtNTO DI SINTASSI 



SIGNIFICATO 



VALORI DI DEFAULT 



control variable 



consiste in una variabi- 
le semplice numerica 
(intera o in semplice 
precisione). 1 nomi del- 
le variabili di control- 
lo (control variable) 
specificati nelle istru- 
zioni NEXT e FOR devono 
essere uguali. Alla pa- 
rola NEXT può seguire 
una lista di variabili 
di controllo (vedere 
Nested Loops) ma è anche 
possibile scrivere un'i- 
struzione NEXT costi- 
tuita da questa sola 
parola. 



se alla parola NEXT 
non segue alcuna va- 
riabile di controllo, 
l'istruzione NEXT ver- 
rà messa in corrispon- 
denza con l'istruzione 
FOR eseguita per ulti- 
ma 
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initial value 



final value 



increment 



consiste in un'espres- 
sione numerica che spe 
cifica il primo valore 
(cioè il valore inizia- 
le) assegnato alla va- 
riabile di controllo 
quando si esegue una i- 
struzione FOR 



consiste in un'espres- 
sione numerica che spe- 
cifica il valore limite 
della variabile di con- 
trollo. Detto valore 
viene confrontato con la 
variabile di controllo 
ogni volta che il ci- 
clo viene ripetuto 

consiste in un'espres- 
sione numerica che 
specifica l'incremento 
cioè il valore che 
deve essere aggiunto 
(col suo segno al- 
gebrico) alla varia- 
bile di controllo ogni 
volta che l'istruzione 
NEXT viene eseguita 



se non viene specifi- 
cata l'opzione STEP si 
assume un incremento 
di +1. 
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ISTRUZIONI DI CONTROLLO 



Funzionamento delle Istruzioni FOR/NEXT 



Entry- 



Se li incontra una 
istruzione 



... il valore iniziale 
viene assegnalo alla 
variabile di controllo. 



Incremento > Q 



Incremento =0 



Or 



... se la variabile di 
controllo <C = 
valore tinaie 



... vengono eseguite te 
istruzioni tra la FOR 
eia NEXT 



... quando si incontra 
una istruzione NEXT. 
la variabile di controllo 
viene incrementata 



MG 



viene eseguita la prima 
istruzione dopo la 



Exit 



Or 



...ve la variabile d> 
controllo > = 
valore tinaie 


SI 


vengono eseguite le 
istruzioni tra la FOR 
eia NEXT 




quando si incontra 
P istruzione NEXT, 
la variabile di con- 








trollo viene 
decrementata 
















NO 


viene eseguita la prima 
istruzione dopo la 


►Exit 






NEXT 





0- 



•I loop viene 

eseguito 

inde Imi tamen te 



(*) A meno che il valore iniziale e finale coincidano. In tal caso viene 
eseguita la prima istruzione dopo la NEXT 

Figura 8-7 Istruzioni FOR/NEXT 
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Nota 



Un ciclo FOR/NEXT può essere definito "pendente" (pending) se interotto 
da un "break" prima della sua conclusione. Qualsiasi modifica al 
programma residente (come ad esempio: cancellazione e modifica di linee 
e così via) impedirà la conclusione del ciclo. 



Incremento di Valore Positivo 



SE. .. 


ALLORA. . . 


il valore dell'incremento 


il ciclo FOR/NEXT viene eseguito 


è positivo 


finché il valore della variabile 




di controllo non è maggiore del 




valore finale. 




Ad esempio: 




LIST 




10 K=10 




20 FOR 1=1 TO 10 STEP 2 




30 PR1NT I; 




40 K=K+10 




50 PR1NT K 




60 NEXT 




Ok 




RUN 




1 20 




3 30 




5 40 




7 50 




9 60 




Ok 




In questo caso il ciclo è ripetuto 




cinque volte 
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ISTRUZIONI DI CONTROLLO 



i 1 va 1 orp rip 1 1 1 ìncrpmpnfo 

IL va ivi C U C 1 i i 1 II» 1 CIUCI 1 




il ciclo non viene eseauito. 


è oositivo 




Ad esempio: 


E SE 






il vslfirp inÌ7ifllp e suDe— 

XX V 1—1 X \J » \— 11 1 1 L 1U l^p V* J 1_J ^ V» 




LIST 


rìnrp a nupllo finfllp 

1 A V/l C Q U U X X V 1 XII U A ^ 




10 J=0 






20 FOR 1=1 TO i 






30 PRINT I 






40 NEXT 1 






50 PRINT "Exit of the loop" 






Ok 






RUN 






Exit of the loop 






Ok 



Incremento di Valore Negativo 



1 

SE. .. 


ALLORA. . . 


il valore dell 


incremento è 


il ciclo viene eseguito finché il 


negativo 




valore della variabile di control- 






lo non è minore del valore finale. 






Ad esempio: 






LIST 






10 FOR 1%=1 TO -10 STEP -3 






20 PRINT 1%; 






30 NEXT 1% 






40 PRINT 






50 PRINT "Exit "; 






"CONTROL VAR1ABLE=";I% 






Ok 






RUN 






1 -2 -5 -8 






Exit CONTROL VAR1ABLE=-11 






In questo caso il ciclo è eseguito 






quattro volte. Quando termina, la 






variabile di controllo mantiene 






l'ultimo valore assunto (-11) che 






viene visualizzato mediante l'i- 






struzione 50 



► 
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il valore dell'incremento è 


il ciclo non viene eseguito. 


negativo 




E SE 


Ad esempio: 


il valore iniziale è minore 




di quello finale 


LIST 




10 FOR K%=1 TO 10 STEP -2 




20 PR1NT K%; 




30 NEXT K% 




40 PR1NT "Exit"; 




"CONTROL VAR1ABLE=";K% 




Ok 




RUN 




Exit CONTROL VAR1ABLE=1 




Ok 



Incremento di Valore Uguale a Zero 




SE. .. 


ALLORA. .. 


il valore dell'incremento è 


il ciclo viene ripetuto senza fine 


uguale a zero 


(a meno che il valore iniziale ed 




il valore finale coincidano, in 




questo caso il loop non verrà 




affatto eseguito) 




Ad esempio: 



LIST 

100 FOR A%=1 TO 30 STEP 0 
110 PRINT A%; 
120 NEXT A% 
Ok 
RUN 

1 1 1... 

Si dovrà impostare KWflM Bfl per 

interrompere l'esecuzione 
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ISTRUZIONI DI CONTROLLO 



Nested Loops (Cicli Nidificati) 

Due o più cicli FOR/NEXT possono essere nidificati a condizione che il 
ciclo FOR/NEXT interno sia interamente compreso in quello esterno. 1 
seguenti cicli, ad esempio, sono corretti: 

| 50 FOR 1 = 1 TO 10 

r-100 FOR J = 2 TO 20 
' — 200 NEXT J 
' 300 NEXT 1 



mentre i seguenti non lo sono: 



50 FOR 1 = 1 TO 10 

100 FOR J = 2 TO 20 

150 NEXT I 

L- 200 NEXT J 



Due o più cicli FOR/NEXT nidificati non devono avere la stessa variabile 
di controllo. 

Ad ogni istruzione FOR deve corrispondere una istruzione NEXT. 

Se i cicli nidificati hanno lo stesso punto finale, si può utilizzare 
per tutti una sola istruzione NEXT con una lista di tutte le variabili 
di controllo separate da una virgola. 



Esempio: 

50 FOR 1=1 TO 10 
100 FOR J = 2 TO 20 



200 NEXT J,l 

Quando si incontra un ciclo nidificato, questo viene eseguito. Alla fine 
dell'esecuzione del ciclo viene eseguita la prima istruzione successiva 
all'istruzione NEXT associata. 

Non c'è limite al numero di cicli interni a un altro ciclo. 11 numero di 
loop contemporaneamente attivi è limitato solo dalla quantità di memoria 
disponibile. 
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1 cicli nidificati forniscono un metodo di programmazione molto utile 
per risolvere un'ampia gamma di problemi. Qui di seguito viene 
illustrato un esempio di ciclo nidificato. 



Esempio 



VIDEO 



LIST 

10 REM PRIME NUMBERS 

20 INPUT "Enter limits N,M";N,M 

30 PRINT "Primes from";N;"T0";M 

40 PRINT 

50 PRINT 

60 FOR 1=N TO M 

70 LET K=SQR(1) 

80 FOR J=2 TO K 

90 LET E=l/J-1NT(1/J) 

100 IF E=0 THEN 130 

110 NEXT J 

120 PRINT 1; 

130 NEXT I 

140 PRINT 

150 PRINT 

160 PRINT "End of List" 

170 END 

Ok 

RUN 

Enter limits N,M? 1,15 
Primes from 1 TO 15 

1 2 3 5 7 11 13 

End of List 
Ok 



COMMENTI 



sono visualizzati tutti i numeri 
primi compresi in un dato insieme. 
Un ciclo FOR/NEXT specifica l'in- 
sieme dei numeri presi in consi- 
derazione. Un secondo ciclo, nidi- 
ficato nel primo, contiene un 
algoritmo per determinare quali 
numeri dell'insieme specificato 
siano un numero primo. 

Per spiegare l'algoritmo: i numeri 
assegnati ad una variabile (in 
questo caso 1) sono divisi per un 
numero intero (in questo caso J) 
il cui valore è compreso tra 2 e 
la radice quadrata di I. Se il 
resto della divisione è uguale a 
0, I non è un numero primo. Viene 
allora generato il numero 1+1 e 
l'esecuzione viene ripetuta. La 
scelta della radice quadrata del 
valore finale viene effettuata 
poiché se vi sono fattori interi 
del numero I, essi saranno sempre 
collocati tra 2 e la radice 
quadrata di 1. 

Nota : L'istruzione 100 consente di 
uscire dal ciclo interno anche se 
J non è maggiore di K. E' difatti 
possibile uscire da un ciclo 
quando una determinata condizione 
è soddisfatta. Non è invece possi- 
bile entrare nel "mezzo" di un 
ciclo. 
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ISTRUZIONI DI CONTROLLO 



Note 

- se un'istruzione NEXT viene eseguita prima della corrispondente istru- 
zione FOR, viene emesso il messaggio di errore: 

NEXT without FOR 

e l'esecuzione del programma viene interrotta. 
Ad esempio: 

1200 IF A>5 THEN 2010 



2000 FOR J=1 TO 7 
2010 PR1NT "HELLO" ; 
2020 NEXT J 

Quando si esegue l'istruzione 2020 a seguito di un salto dall'istru- 
zione 1200, il BASIC visualizza il sopracitato messaggio di errore e 
ritorna in Stato Comandi. 

- il valore finale è sempre definito prima di quello iniziale. Se ad 
esempio si introduce: 

10 1=5 

20 FOR 1=1 TO 1+5 

l'istruzione 20 assegnerà il valore 10 al valore finale. Comunque per 
agevolare la leggibilità del programma, non è consigliabile usare la 
variabile di controllo per definire il valore finale. 

- se possibile, è buona norma di programmazione usare una variabile 
intera per la variabile di controllo e costanti (o variabili) intere 
per il valore iniziale e finale e per l'incremento. Ciò ottimizzerà la 
velocità di esecuzione. 



UHILE/UEND (PROGRAMMA/IMMEDIATO) 



Esegue in ciclo una serie di istruzioni finché una determinata condizio- 
ne è vera. 
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Figura 8-8 Istruzione WH1LE 




Figura 8-9 Istruzione WEND 



Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


condition 


può consistere 


in una espressione: 




- numerica, 






- di confronto, 






- logica 





Nota : Il programma BASIC determina se la 
condizione (condition) è vera o falsa control- 
lando se il risultato dell'espressione è 
diverso o uguale a zero. Nel primo caso il 
risultato viene considerato vero, nel secondo 
falso. 

Ciò permette di verificare se il valore di una 
variabile è diverso o uguale a zero, specifi- 
cando semplicemente il nome della variabile 
come condizione. 
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LINGUAGGIO BASIC - MANUALE GENERALE 



ISTRUZIONI DI CONTROLLO 



Funzionamento delle Istruzioni UH1LE/WEND 



Entry- 



se viene incontrata 
una istruzione 



,..e la condizione 
e' 'alia... 




il controllo viene ira- 
sieri to all'istruzione 
successiva alla WEND 














... e la condizione 
e' vera ... 




viene eseguita la se- 
quenza di istruzioni 
tralaWHILE eia 
WEND 







Figura 8-10 Istruzioni WH1LE/UEND 



Nota 



Un ciclo WH1LE/WEND può essere definito "pendente" (pending) se 
interrotto da un "break" prima della sua conclusione. Qualsiasi modifica 
al programma residente (come ad esempio: cancellazione o modifica di 
linee e così via) impedirà la conclusione del ciclo. 



Esempio: 



VIDEO 


COMMENTI 


LIST 


gli elementi della matrice A$ 


90 'BUBBLE SORT ARRAY A$ 


vengono memorizzati in ordine 


100 FL1PS=1 'FORCE ONE PASS THRU LOOP 


ascendente (dall'indice 1 al- 


110 WH1LE FL1PS 


1 ' indice J) 


115 FL1PS=0 




120 FOR 1=1 TO J-1 


Nota: la condizione (in questo 


130 IF A$(1)>A$(U1) THEN 


caso il valore della variabile 


SUAP A$(l),A$(U1 ):FL1PS=1 


FL1PS) può cambiare durante il 


140 NEXT 1 


ciclo (vedi istruzione 130). 


150 UEND 




Ok 




RUN 




Ok 
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Nota 



Non c'è limite al numero di cicli WHILE/WEND interni a un altro ciclo 
WHILE/WEND. Ogni istruzione WEND verrà associata alla istruzione WHILE 
eseguita per ultima. Un'istruzione WHILE a cui non corrisponda 
un'istruzione WEND causa l'errore "WHILE without WEND", così come 
un'istruzione WEND a cui non corrisponda un'istruzione WHILE causa un 
errore "WEND without WHILE". 



E' possibile uscire da un ciclo WHILE/WEND, o perchè la condizione 
specificata dopo WHILE è diventata falsa, o tramite un'istruzione 
1F...THEN o GOTO. 

Non è invece possibile entrare in un ciclo WHILE/WEND senza eseguire 
l'istruzione WHILE. 
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9. FUNZIONI 



SOMMARIO 



Questo capitolo descrive le funzioni built-in (di sistema) che possono 
essere richiamate da ogni programma senza che sia richiesta una ul- 
teriore definizione e le funzioni definite dall'utente che possono 
essere utilizzate esattamente nello stesso modo, ma solo nell'ambito del 
programma nel quale sono state definite. 
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FUNZIONI 



INTRODUZIONE 

Vi sono delle circostanze in cui nell'ambito dello stesso programma si 
deve fare ricorso più volte ad una stessa espressione. 

Per evitare di scrivere tali espressioni più di una volta e per 
risparmiare spazio è possibile definire funzioni e richiamarle in più 
punti del programma. 

Il richiamo di una funzione si può ottenere specificando il suo nome 
seguito da uno o più argomenti tra parentesi, rappresentanti i valori da 
passare ai parametri. Ad ogni argomento corrisponde un parametro nella 
definizione della funzione. 

Gli argomenti sono separati da virgole. Possono essere costanti, 
variabili o espressioni. Anche i parametri sono separati da 
virgole, ma possono essere solo delle variabili. 

11 numero dei parametri deve essere uguale a quello degli argomenti e il 
tipo di ogni argomento (numerico o stringa) deve essere uguale al tipo 
del parametro corrispondente. La corrispondenza è di tipo posizionale 
(cioè al primo argomento corrisponde il primo parametro, ecc.). E 1 
possibile trasferire uno o più argomenti a una funzione o addirittura 
nessuno. 

Sono possibili conversioni nel passaggio di argomenti numerici a parame- 
tri di tipo diverso. Per esempio se si fornisce un valore a virgola mo- 
bile nel caso in cui è richiesto un intero, il BASIC arrotonderà tale 
valore all'intero più vicino. 

Una funzione calcola un solo valore, che può essere di tipo numerico o 
stringa in funzione del tipo di espressione usata per definire la fun- 
zione. 

Le funzioni del linguaggio BASIC possono essere classificate in due 
categorie principali: 

- Funzioni built-in o di sistema 

Le funzioni di sistema rappresentano una parte intrinseca del 
linguaggio BASIC, e consentono di effettuare un insieme di operazioni 
di tipo numerico o stringa di uso comune. L'utente può utilizzarle in 
qualunque programma senza dover procedere ad una definizione esplici- 
ta. Un elenco completo delle funzioni di sistema corredato da una 
descrizione viene fornito di seguito. 

- Funzioni definite dall'utente 
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Nell'ambito di un programma BASIC l'utente può definire un numero 
arbitrario di funzioni utilizzando l'istruzione DEF FN. 11 nome di una 
funzione definita dall'utente inizia con FN e può essere qualunque 
nome valido di variabile. 

Tutte le funzioni devono essere definite prima di essere richiamate. 



Esempi: 


VIDEO 


COMMENTI 


10 A=X*S1N(X)+L0G(X) 


in questo caso SIN e LOG sono 




funzioni numeriche di sistema 


LIST 


FNH è una funzione definita dal- 


10 DEF FNH(X,Y)=SQR(X*X+Y*Y) 


l'utente. Essa viene definita 


20 INPUT "S1DES";X1 ,Y1 


dall'istruzione DEF FN (vedere 


30 PR1NT "H=";FNH(X1 ,Y1); 


l'istruzione 10), e calcola la 


"X1=";X1 ;"Y1=";Y1 


radice quadrata della somma dei 


40 GOTO 20 


quadrati dei parametri X ed Y 


Ok 


usando la funzione di sistema SOR. 


RUN 




S1DES? 3.5,1.2 


L'istruzione 30 richiama la fun- 


H= 3.7 X1 = 3.5 Y1= 1.2 


zione definita dall'utente attri- 


S1DES? 1.7,4 


buendo due argomenti ai parametri 


H= 4.34626 X1= 1 .7 Y1 = 4 


corrispondenti . 


SIDES? AC 




Break in 20 


Nota: 1 nomi degli argomenti 


Ok 


possono non coincidere con quelli 




dei parametri corrispondenti. 



FUNZIONI DEFINITE DALL'UTENTE 

Se si deve utilizzare ripetutamente una equazione di tipo numerico o 
stringa è molto più conveniente definire la stessa sotto forma di 
funzione. La funzione così definita può essere richiamata esattamente 
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nello stesso modo delle funzioni di sistema. L'unico vincolo consiste 
nel fatto che la definizione è valida solo per quel determinato 
programma e deve quindi essere ridefinita in ogni programma che richiede 
la sua utilizzazione (a meno che il secondo programma non sia 
concatenato al primo mediante l'uso dell'opzione MERGE). 



DEF FN (PROGRAMMA) 



DEF FN definisce una funzione utente di tipo numerico o stringa. 

L'istruzione DEF FN deve essere eseguita prima che la funzione che essa 
definisce possa essere richiamata. 

L'istruzione DEF FN non é ammessa nel calcolo immediato. 




Figura 9-1 Istruzione DEF FN 




Or 



argument 




Figura 9-2 Richiamo della Funzione 



Dove 



ELEMENTO 


DI SINTASSI 




SIGNIFICATO 


function 


name 


un nome valido 


di variabile che inizia coii FN. 






Non si devono 


inserire spazi tra FN e il nome 






della funzione 


e il primo carattere del nome 






deve essere una 


lettera. 
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parameter 



argument 



expression 



*e il nome della funzione specifica anche un tipo, il 
valore della funzione viene ricondotto a quel tipo. 

una variabile "dummy" che dovrà essere rimpiaz- 
zata dal valore dell'argomento corrispondente 
quando la funzione viene richiamata. L'associa- 
zione argomenti/parametri è di tipo posizionale 
(cioè al primo argomento corrisponde il primo 
parametro e così via). 



il valore effettivo che dovrà essere attribuito 
al parametro corrispondente. Ogni argomento può 
essere una costante, una variabile o una 
espressione. 



una espressione che esegue l'operazione della 
funzione. 

11 tipo dell'espressione (numerico o stringa) 
deve coincidere con quello della funzione. 

L'espressione include di norma come variabili 
solo i parametri della funzione, ma può include- 
re anche variabili di programma definite ester- 
namente alla definizione della funzione (varia- 
bili globali). 

1 nomi di parametri che compaiono nell'espres- 
sione servono unicamente a definire la funzione 
e non influenzano eventuali variabili di pro- 
gramma che hanno lo stesso nome. Tuttavia, per 
una maggiore leggibilità del programma, si 
sconsiglia di dare lo stesso nome a un parametro 
e a una variabile di programma. 



Caratteristiche 



SE... ALLORA... 



il tipo di un argo- si verifica un errore di 
mento non ha le stes- (incompatibilità di tipo) 
se caratteristiche del 
parametro corrispon- 
dente 

. U 



"type mismatch" 
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una funzione definita 
dall 'utente viene 
richiamata prima di 
essere definita 



si verifica l'errore di "Undefined user function" 
(Funzione utente non definita) 



una funzione definita 


la funzione richiamata deve essere definita 


dall'utente viene ri- 


nell'ambito dello stesso programma in una 


chiamata da un'altra 


posizione precedente. 


funzione definita dal- 




1 ' utente 


Ad esempio: 




18 P)FF FNA(X)-(S1N(X/ I ii*? 11/1H0 




20 DEF FNB(X)=(FNA(X)+51N(X))*.5 


un orooramma con— 


1 o nPfl ni Hi funn nnfl Hov/rtnr» ac e ar~ a r»ri *fn 

ic u_i il.. usuili ui luiniuiit; ucvonu essere scritte 


catena un altro con 


nel programma concatenante prima dell'istruzione 


1 'opzione MERGE 


CHAIN se vengono richiamate dal programma 




concatenato. Altrimenti, quando verrà completata 




l'operazione di MERGE, la funzione definita 




dall'utente risulterà non definita, (per maggio- 




ri dettagli vedere il capitolo 11). 




Ad esempio: 




10 DEF FNA(X) = (X+X*(X+D) 




100 CHAIN MERGE "VI :PR0G1" 



Note 

La sintassi del Richiamo di Funzione è valida sia per le funzioni 
definite dell'utente sia per le funzioni di sistema. 



F UNZIONI NUMERICH E DI SI STEMA 

11 linguaggio BASIC fornisce un numero di routine standard che 
consentono di evitare di scrivere gruppi di istruzioni per calcolare 
funzioni matematiche quali la radice quadrata, il seno o il logaritmo 
naturale ecc.. Ad eccezione della funzione CDBL che ritorna un 
risultato in doppia precisione, i risultati delle funzioni numeriche di 
sistema sono o numeri interi o numeri in singola precisione. 
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Tutte le funzioni numeriche di sistema (built-in) sono elencate qui di 
seguito in ordine alfabetico. 



Nota: In questo paragrafo descriveremo anche l'istruzione RAND0M1ZE, 
perchè strettamente connessa alla funzione RND. 



I ABS (PROGRAMMA/IMMEDIATO) 



Calcola il valore assoluto di una espressione numerica. 



Figura 9-3 Funzione ABS 



Esempio 

PR1NT ABS (7*(-5)> 

35 
Ok 



I ATN (PROGRAMMA/ IMMEDIATO) 



Calcola 1 'arcotangente dell'argomento. 



11 valore calcolato è espresso in radianti e si colloca nell'ambito di 
-a/2 e n/2 (dove Jt è 3.1415...) 



Figura 9-4 Funzione ATN 
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Esempio 

10 INPUT X 
20 PR1NT ATN(X) 
Ok 
RUN 
? 3 
1.24905 
Ok 



Note 



Il calcolo di ATN viene eseguito in semplice precisione. 



CDBL (PROGRAMMA/ IMMEDIATO) 



La funzione CDBL converte qualsiasi formato numerico in un argomento in 
doppia precisione (8 byte). 



Figura 9-5 Funzione CDBL 



Esempio 

10 A = 454.67 

20 PR1NT A;CDBL(A) 

RUN 

454.67 454.670013427734 
Ok 
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I CINT (PROGRAMMA/ IMMEDIATO) 




Converte un qualsiasi argomento di tipo numerico in un intero arroton- 
dando la parte frazionaria (se la parte frazionaria è >.5 l'intero è 
arrotondato per eccesso, in caso contrario per difetto). 



Figura 9-6 Funzione CINT 



Eseapio 

PRINT C1NT(45.67) 

46 
Ok 



Note 

Se l'argomento non è compreso tra i valori -32768 e 32767 si verifica un 
errore di "Overflow". 

Vedere anche le funzioni F1X e 1NT, che forniscono anch'esse valori 
interi . 



COS (PROGRAMMA/ IMMEDIATO) 



Calcola il coseno dell'argomento. 



Figura 9-7 Funzione COS 
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Esempio 

10 X = 2*C0S(.4) 
20 PR1NT X 
RUN 
1.84212 
Ok 



Note 

L'argomento fornito alla funzione viene assunto come la misura di un 
angolo espressa in radianti. 

La valutazione di COS è effettuata in singola precisione. 

(PROGRAMMA/IMMEDIATO) 



Converte un argomento di tipo numerico in un numero in singola pre- 
cisione (4 byte). 




Figura 9-8 Funzione C5NG 



Esempio 



10 A#= 975.3421* 

20 PR1NT A# ; CSNG(A#) 

RUN 

975.3421 975.342 
Ok 



Note 

Si vedano anche le funzioni C1NT e CDBL per la conversione di numeri nei 
formati interi e a doppia precisione. 
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I EXP (PROGRAMMA/IMMEDIATO) 



Eleva la costante "e" (dove "e" vale 2.71828) ad una potenza pari al 
valore dell'argomento. 



Figura 9-9 Funzione EXP 



Esempio 

10 X = 5 

20 PR1NT EXP (X-1) 
RUN 

54.5982 
Ok 



Note 



Il valore dell'argomento deve essere < 88.7228 altrimenti viene 
visualizzato il messaggio di "Overflow"; viene fornito come risultato il 
numero massimo che la macchina può rappresentare con il segno 
appropriato e l'esecuzione continua. 

La valutazione di EXP viene effettuata in singola precisione. 



I F1X (PROGRAMMA/ IMMEDIATO) 



Calcola la parte intera dell'argomento (troncamento). 



Figura 9-10 Funzione F1X 
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Eseapi 

PR1NT FIX(58.75) 

58 
Ok 

PRINT FlX(-58.75) 

-58 

Ok 



Note 

FIX(X) è equivalente a SGN(X)*1NT(ABS(X)) . 

A differenza di INT, FIX nel caso di argomenti negativi non dà il valore 
immediatamente inferiore (vedere il secondo esempio). 



Calcola lo spazio di memoria non utilizzato dal programma BASIC. 





Figura 9-11 Funzione FRE 



ELEMENTO DI SINTASSI 



SIGNIFICATO 



è una espressione numerica o stringa. 11 valore 
che la funzione calcola è lo stesso qualunque 
sia l'argomento dato. 



Esempi 



PRINT FRE (0) 

14542 
Ok 
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PR1NT FRE(XS) 

14542 
Ok 

FRE ("") prima di calcolare il numero di byte disponibili forza un 
"garbage collection" (eliminazione degli spazi vuoti). Inoltre il BASIC 
fa automaticamente questa operazione nel caso che si abbia saturazione 
della memoria utente. 



| 1NT (P 



PROGRAMMA/ IMMEDIATO) 



Dà l'intero più grande inferiore o uguale all'argomento. 



Figura 9-12 Funzione INI 



Esempi 



PR1NT 1NT(99.89) 

99 
Ok 

PRINT INTM2.11) 

-13 

Ok 



Note 



Si noti la differenza tra 1NT e F1X. In presenza di valori negativi per 
1NT il risultato è sempre inferiore o uguale all'argomento, mentre per 
F1X è sempre maggiore o uguale. 
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LOG (PROGRAMMA/INDIATO) 



Calcola il logaritmo naturale di un argomento positivo. 



ex pressi 



r*i *^ — * 



Figura 9-13 Funzione LOG 



Dove: 



ELEMENTO DI SINTASSI 
numeric expression 



SIGNIFICATO 



deve essere positiva. Altrimenti si verifica il 
messaggio di errore "lllegal function cali" 



Esempio 

PRINT L0G(45/7) 

1.86075 
Ok 



Note 



log x 



Poiché log x =- , il logaritmo in base 10 (o in qualsiasi altra 

a ^°9 e a 

base) può essere facilmente calcolato per mezzo della funzione LOG. 

Se fosse necessario calcolare il logaritmo in base 10 di più valori 
nell'ambito di un programma, sarebbe allora opportuno definire una 
funzione utente che consenta detto calcolo. 

Ad esempio è sufficiente scrivere in testa al programma: 
10 DEF FNLOG10(X)=LOG(X)/LOG(10) 

e richiamare la funzione FNLOG10 ove necessario, passando a questa 
l'argomento desiderato. 

La valutazione della funzione LOG viene fatta in semplice precisione. 
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I RND (PROGRAMMA/IMMEDIATO) 



Ritorna un numero casuale compreso tra 0 ed 1 . La stessa sequenza di 
numeri casuali viene generata ogni volta che il programma viene 
eseguito, a meno che il generatore dei numeri casuali venga riinizializ- 
zato (vedere l'istruzione RAND0M1ZE). 




Figura 9-14 Funzione RND 



Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


numeric expression 


< 0 ricomincia la stessa sequenza di numeri 




casuali. 




=0 ripete l'ultimo numero generato 




>0 (oppure omesso, cioè RND) viene generato il 




prossimo numero casuale della .sequenza 




F sempio 

10 FOR 1=1 TO 5 

20 PRINT 1NT(RND*100); 

30 NEXT 

RUN 

8 25 77 68 7 
Ok 



Note 

Sebbene il numero venga chiamato casuale, esso viene in realtà estratto 
da un ciclo prefissato di numeri (circa un milione in tutto). 
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Dal momento che il ciclo inizia per ogni esecuzione, lo stesso programma 
fornisce lo stesso risultato ogni volta che viene eseguito. 

Quando tutti i numeri sono stati utilizzati, il ciclo inizia nuovamente. 



Per modificare la sequenza dei numeri casuali ogni volta che il 
programma viene eseguito, si deve usare l'istruzione RAND0M1ZE. 



RAND0M1ZE (PROGRAMMA/IMMEDIATO) 



Modifica il generatore di numeri casuali. 



RANDOMIZE 



\ J I numeric I 1 
J expression 



Figura 9-15 Istruzione RANDOMIZE 



Dove 



ELEMENTO DI SINTASSI 
numeric expression 



SIGNIFICATO 



il suo valore deve essere conpreso tra -32768 e 
32767. Se il valore non è un intero, viene 
arrotondato all'intero più prossimo. Questo 
numero viene utilizzato per definire il punto 
iniziale di una nuova sequenza di numeri 
casuali . 

Se invece viene omesso, l'esecuzione del pro- 
gramma viene sospesa ed il BASIC richiede un 
valore visualizzando: 

Random Number Seed (-32768 to 32767)? 

prima- di eseguire l'istruzione RANDOMIZE 
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Note 



5e il generatore dei numeri casuali non è riinizializzato, la funzione 
RND dà la stessa sequenza di numeri casuali ogni volta che il programma 
viene eseguito. Per modificare la sequenza dei numeri casuali per ogni 
esecuzione del programma, si ponga l'istruzione RAND0M1ZE all'inizio del 
programma e si modifichi l'argomento ad ogni esecuzione. 

E' anche possibile generare numeri casuali compresi in un dato 
intervallo. Per generare la sequenza tra A e B si usi la formula 



10 RAND0M1ZE 
20 FOR 1=1 TO 5 
30 PR1NT RND; 
40 NEXT I 
RUN 

Random Number Seed (-32768 TO 32767)? 3 (l'utente digita 3 ESM 1 

.88598 .484668 .586328 .119426 .709225 
Ok 
RUN 

Random Number Seed (-32768 to 32767)? 4 (l'utente digita 4 ULI per una 
nuova sequenza) 

.803506 .162462 .929364 .292443 .322921 
Ok 
RUN 

Random Number Seed (-32768 to 32767)? 3 (stessa sequenza della prima 
esecuz ione 

.88598 .484668 .586328 .119426 .709225 
Ok 



S&N (PROGRAMMA/ IMMEDIATO 




Dà 1 se l'argomento è positivo, 0 se è uguale a zero e -1 se è negativo. 



F1X((B+1-A)*RND+A) 



Esempi 
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Figura 9-16 Funzione SGN 
Esempio 

ON SGN(X)+2 GOTO 100,200,300 
salta a: 

- 100 se X < 0 

- 200 se X = 0 

- 300 se X • 0 



Calcola il seno dell'argomento 



SIN (PROGRAMMA/ IMMEDIATO) I 




Figuro 9-17 Funzione SIN 



Esempio 

PR1NT SIN(1.5) 

.997495 
Ok 
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Note 



Si assume che il valore dell'argomento sia quello di un angolo misurato 
in radianti. 

SIN viene valutato in singola precisione. 



I SQR (PROGRAMMA/ IMMEDIATO) 



Calcola la radice quadrata dell'argomento. 



Figura 9-18 Funzione SOR 



Esempio 

10 FOR X = 10 TO 25 STEP 5 
20 PR1NT X, SQR(X) 
30 NEXT 
RUM 

10 3.16228 

15 3.87298 

20 4.47214 

25 5 
Ok 



Note 

L'argomento deve essere maggiore o uguale a zero, altrimenti si ha il 
messaggio "lllegal function cali". SOR viene valutata in singola 
precisione. 



TAN (PROGRAMMA/ IMMEDIATO) 



Calcola la tangente dell'argomento 



9-18 



LINGUAGGIO BASIC - MANUALE GENERALE 



FUNZIONI 



Figura 9-19 Funzione TAN 
Eseapio 

10 Y = Q*TAN(X)/2 



Si assume che il valore dell'argomento sia quello di un angolo misurato 
in radianti. 

Se nell'esecuzione di TAN si verifica un "overflow", viene visualizzato 
il messaggio di "Overflow", viene fornito come risultato il numero 
massimo che la macchina può rappresentare con il segno appropriato e 
l'esecuzione continua. 

TAN viene valutata in singola precisione. 



FUNZ IONI ST R INGA DI SISTEMA 

Sono funzioni intrinseche che calcolano un valore stringa o un valore 
numerico e consentono l'utilizzazione di uno o più argomenti numerici 
e/o stringa. 

Semplificano operazioni stringa quali l'estrazione di una sottostringa 
da una stringa. 

Tutte le funzioni stringa di sistema sono elencate qui di seguito in 
ordine alfabetico. 



Nota 

In questo paragrafo descriveremo anche l'istruzione H1DS, perchè 
strettamente connessa alla funzione M1DS. 
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I ASC (PROGRAMMA/ IMMEDIATO) 



Calcola un valore numerico che è il codice decimale ASC li del primo 
carattere di una stringa data. 




Ho- 



Figura 9-20 Funzione ASC 



10 XS = "TEST" 
20 PRINT ASC(XS) 
RUM 
84 
0k 

Note 

Se il valore dell'argomento è la stringa nulla, si verifica un errore 
(lllegal function cali). 

Vedere la funzione CHRS per la conversione da codice decimale ASCII a 
carattere. 



Calcola una stringa di un carattere il cui codice decimale ASCII è il 
valore dell'argomento. 



Esempio 




I CHRS (PROGRAMMA/IMMEDIATO) 





numeric 
expression 




Figura 9-21 Funzione CHRS 
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Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


numeric expression 


l'espressione numerica viene valutata ed arro- 
tondata all'intero più prossimo. Deve collocarsi 
nell ambito di 0 e Z55 e viene interpretata come 
un codice decimale ASCII. Se non cade in questo 
intervallo si ha il messaggio lllegal function 
cali" 


Esempio 




PR1NT CHRS (66) 

B 

Ok 







Note 

La funzione CHRS viene spesso usata per inviare un carattere speciale al 
terminale. Ad esempio, può essere lanciato il carattere ASCII "BEL" 
(CHRS (7)) quale prefazione ad un messaggio di errore o la tabulazione 
di pagina (CHRS02)) per cancellare il video e riportare il cursore alla 
posizione iniziale. 



Si veda la funzione ASC per 
corrispondente codice decimale. 



la conversione da carattere ASCII al 



HEXS ( PROGRAMMA/ IMMEDIATO ) 



I 



Converte un numero decimale in una stringa esadecimale. 



Figura 9-22 Funzione HEXS 
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Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


numeric expression 


l'espressione 


numerica è arrotondata all' 


intero 




più prossimo 


prima che la funzione HEXS 


venga 




valutata 







Esempio 

10 INPUT X 

20 A$ = HEX$(X) 

30 PR1NT X "DECIMAI. IS " A$ " HEXADEC1MAL" 
RUN 

? 32 

32 DECIMAL 1S 20 HEXADECIMAL 
Ok 



Note 



Si veda la funzione 0CT$ per la conversione ottale. 



I INKEYS (PROGRAMMA/ IMMEDIATO) 



Ritorna una stringa di un carattere: questo è il primo carattere 
impostato in tastiera oppure è la stringa njlla se non vi sono caratteri 
impostati in attesa di essere elaborati. 1 caratteri non vengono 
visualizzati e vengono inoltrati al programma, eccetto per JijjjTM U 
che interrompe l'esecuzione del programma. 



Figura 9-23 Funzione INKEYS 
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Eseapio 



VIDEO 


\,\Ji II IC 11 1 1 


1000 


'Timed Input Subroutine 




Oup^tfl mutine rìtnrnfl 

I|UC3 1Q 1 UJ IIIIC 1 1 LUI Ila 


1010 


RESP0NSE$="" 




due valori : 


1020 


FOR I%=1 TO T1MEL1MIT% 






1030 AS=1NKEY$:1F LEN(A$)=0 THEN 1060 




- RFSPONSFS che ron- 


1040 


1F A5C(A$)=13 THEN T1MEOUT%=0: RETURN 




ti ono la ef nnna 
Liciic io )H ii'yd 


1050 


RESPONSE$=RESPONSE$+A$ 




1 liipOb Ld La 


1060 


NEXT 1% 






1070 


TIMEOUT^! : RETURN 




1 - TIMEOUT* rhp pani- 








vale a 0 se 1 'utente 








imposta una stringa 








Hi rsrjsttfln nr*ima 
Ul LQI al Iti 1 Ul lino 








di fonio 1 pf a rp un 








^^a^ n ni imo rn Hi ci ri i 








FOR/NEXT (numero pa- 








ri a TTMF! \ 








altrimenti equivale 








a 1 








Nota: la funzione 








LEN viene descritta 








più avanti in questo 








capitolo. 



1NPUTS (PROGRAMMA/IMMEDIATO) 



Ritorna una stringa di una lunghezza specificata, impostata da tastiera 
o letta da un file su disco. 1 caratteri non sono visualizzati e sono 
inoltrati al programma eccetto per M che interrompe l'esecuzio- 

ne del programma. 




Figura 9-24 Funzione 1NPUTS 
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I 



Dove 



ELEMENTO DI 5INTASS1 


SIGNIFICATO 


length 


espressione numerica arrotondata all'intero più 
prossimo. Specifica la lunghezza della stringa 



file number è il numero Ji buffer associato al file (v. Cap. 12) 



Esempi 



VIDEO 


COMMENTI 


10 


0PEN"1",1 , "DATA" 


Ouesto programma pro- 


20 


IF EOF (1) THEN 50 


duce un listing di un 


30 


PR1NT HEXS(ASC(1NPUT$(1.# 1))); 


file sequenziale in 


40 


GOTO 20 


caratteri esadecimali 


50 


PR1NT 




60 


END 


Nota: E0F=-1 quando si 




raggiunge la fine del 






file (v. Capitolo 12) 


110 


X$=INPUTS(1) 


Impostare S per arre- 


120 


1F X$="S" THEN END 


stare l'esecuzione 






e qualsiasi altro ca- 



rattere per continuare 



1NSTR ( PROGRAMMA/IMMEDIATO ) 




Ricerca la prima occorrenza di una sottostringa in una stringa e dà la 
posizione in cui essa «iene individuata. 




' ' ' ' ' ' 

Figura 9-25 Funzione 1NSTR 
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LINGUAGGIO BASIC - MANUALE GENERALE 



r UNZIONI 



Dove 



ELEMENTO DI SINTASSI 




SIGNIFICATO 


start position 




è una espressione numerica arrotondata all'in- 
tero più prossimo che specifica dove la ricerca 
deve iniziare. 11 suo valore deve essere 
compreso tra 1 e 255. Qualora venga omesso si 
assume il valore 1 


string 




è una espressione stringa il cui valore è la 
stringa da scandire 


substring 




è una costante o una variabile stringa di cui si 
deve cercare la prima occorrenza 



Esempio 



VIDEO 


COMMENTI 


10 XS = "ABCDEB" 
20 YS = "B" 

30 PR1NT 1NSTR(X$,Y$);INSTR(4,X$,YS 

RUN 

2 6 

Ok 


Si noti che la posizione in cui 
viene trovata la prima occorrenza 
della sottostringa viene sempre 
calcolata dall'inizio della strin- 
ga originaria, anche nell'eventua- 
lità che venga indicata una posi- 
zione di partenza (start position) 



Valori Speciali 



SE... 




ALLORA. . . 


start position >LEN (string) 




il valore della funzione è 0 


start position non è compreso 
tra i valori 1 e 255 




si ha il messaggio di errore: 
"lllegal function cali" 


string è una stringa nulla ("") 




il valore della funzione è 0 
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substring non è individuata 



il valore della funzione è 0 



substring è una stringa nulla 
e start position è specificata 


il valore della funzione è uguale 
a quello di start position 


substring è una stringa nulla 
e la start position non è speci- 
ficata 


il valore della funzione è 1 



I LEFTS (PROGRAMMA/IMMEDIATO) 




Fornisce una sottostringa estraendo i caratteri più a sinistra di una 
stringa data per una lunghezza pari a quella assegnata. 




Figura 9-26 Funzione LEFT$ 



Dove 



ELEMENTO DI SINTASSI SIGNIFICATO 



string è una espressione stringa il cui valore corri- 

sponde alla stringa dalla quale la sottostringa 
deve essere estratta 



length è una espressione numerica arrotondata all'in- 

tero più prossimo il cui valore (da 0 a 255) 
rappresenta la lunghezza della stringa ritornata 



Esempio 



10 AS = "BASIC LANGUAGE" 
20 B$ = LEFTS(AS,5) 
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FUNZIONI 



30 PR1NT BS 

RUN 

BASIC 

Ok 




Note 




SE... 


ALLORA... 


length=0 


il valore della funzione è una stringa nulla 


length non è compreso 
tra 0 e 255 


si ha il messaggio di errore "lllegal function 
cali" 

(Richiamo di funzione illegale) 


length > =LEN(string) 


il valore della funzione è l'intera stringa 



LEN (PROGRAMMA/ IMMEDIATO) | 



Calcola la lunghezza di una stringa specificata. 



ho- 

Figura 9-27 Funzione LEN 
Esempio 

10 X$ ="P0RTLAN0, OREGON" 
20 PR1NT LEN(XS) 
RUN 
16 
Ok 

Note 

La funzione LEN conta tutti i caratteri (stampabili o meno) e anche gli spazi. 
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M1DS - Funzione (PROGRAMMA/IMMEDIATO) 




Estrae una sottostringa da una stringa, iniziando da una data posizione 
di carattere. Si può specificare la lunghezza della sottostringa 
richiesta. In caso contrario verranno ritornati tutti i caratteri della 
stringa da quella posizione alla fine. 




Figura 9-28 Funzione MIDS 



Dove 



ELEMENTO DI SINTASSI 
string 



start position 



length 



COMMENTI 



è una espressione stringa il cui valore corri- 
sponde alla stringa dalla quale la sottostringa 
deve essere estratta 

è una espressione numerica arrotondata all'in- 
tero più prossimo il cui valore ( >=1 e <= 
della lunghezza della stringa) specifica la 
posizione del carattere d'inizio della sotto- 
stringa estratta 



è una espressione numerica arrotondata all'in- 
tero più prossimo il cui valore (da 0 a 255) 
rappresenta la lunghezza . della sottostringa 
da estrarre. Se essa viene omessa, vengono 
estratti tutti i caratteri dalla posizione 
definita da "start position" alla fine delia 
stringa. Se length = 0 la funzione fornisce la 
stringa nulla. 
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LINGUAGGIO BASIC - MANUAI E GENERALE 



FUNZIONI 



Esempio 

LIST 

10 A$="G00D " 

20 BS="M0RN1NG EVENING AFTERNOON" 

30 PRINT AS;MIDS(BS,9,7) 

Ok 

RUN 

GOOD EVEN1NG 
Ok 



Note 



SE 




ALLORA... 


start position > 


LEN(string) 


il valore della funzione è una 
stringa nulla 


start position=0 




si ha il messaggio di errore 
"lllegal Function cali in line 
nnnnn" (Argomento illegale nel 
numero di linea) 


length è omessa 
OPPURE 

il numero dei caratteri è in- 
feriore a quello specificato 


vengono estratti tutti i caratteri 
a partire da "start position" fino 
alla fine della stringa 


da length 







M1DS - Istruzione (PROGRAMMA/IMMEDIATO) 



Sostituisce in tutto o in parte una data stringa con un'altra stringa. 



Figura 9-29 Istruzione MIDS 
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Dove 



ELEMENTO DI SINTASSI 
string 



start position 



length 



replacing string 



SIGNIFICATO 

è una variabile stringa il cui valore rappre- 
senta la stringa di cui bisogna sostituire una 
parte 



è un'espressione numerica il cui valore, arro- 
tondato all'intero più vicino deve essere >=1 e 
<==alla lunghezza della stringa data. 

Questo valore specifica la posizione di carat- 
tere dove deve iniziare la sostituzione. 



è un'espressione numerica il cui valore viene 
arrotondato all'intero più vicino. Esso deve 
essere compreso tra 0 e 255 e rappresenta la 
lunghezza della stringa risultante. 

Se il parametro length è omesso, vengono sosti- 
tuiti tutti i caratteri a partire da start 
position fino alla fine di replacing string. 
Tuttavia, indipendentemente dal fatto che 
length venga o meno specificato, la sostituzio- 
ne dei caratteri non va mai oltre alla lunghezza 
della stringa originaria. 



è un'espressione stringa il cui valore sosti- 
tuisce i caratteri della stringa originaria a 
partire da start position 



Esempio 

10 AS= "KANSAS CITY, MO" 
20 M1DS(AS,14)= "K5" 
30 PRINT AS 
RUN 

KANSAS CITY, KS 

Oh 
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LINGUAGGIO BASIC - MANUALE GENERALE 



FUNZIONI 



Note 



SE... 


ALLORA... 

i — — 


start position > LEN (string) 


M1DS ritorna la stringa nulla 


start position = 0 


si ha il messaggio d'errore: 
"lllegal function cali" 


length è omessa 


vengono sostituiti tutti i caratteri a 
partire da start position fino alla fine 
di replacing string. 


length =0 


M1DS ritorna la stringa nulla 


si cerca di sostituire 
caratteri oltre alla 
lunghezza della stringa 
originaria 


la sostituzione termina dopo l'ultimo 
carattere della stringa originaria 



OCTS (PROGRAMMA/ IMMEDIATO) | 



Calcola una stringa che rappresenta il valore ottale di un argomento 



Figura 9-30 Funzione 0CT$ 
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Dove 



ELEMENTO DI SINTASSI 
numeric expression 



SIGNIFICATO 



l'espressione numerica è arrotondata all'intero 
più prossimo prima che la funzione OCTS venga 
valutata 



Esempio 

PR1NT 0CT$(24) 

30 
Ok 



Note 

Vedere la funzione HEXS per le conversioni esadecimali 

RIGIfTS (PROGRAMMA/ IMMEDIATO) 

Fornisce una sottostringa estraendo i caratteri più a destra per una 
lunghezza pari a quella assegnata. 




Figura 9-31 Funzione R1GHTS 
Dove 



ELEMENTO DI SINTASSI SIGNIFICATO 



§ un'espressione stringa il cui valore corri- 
sponde alla stringa originale dalla quale la 
sottostringa deve essere estratta 




string 
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LINGUAGGIO BASIC - MANUALE GENERALE 



FUNZIONI 



length 


è una espressione numerica arrotondata all'in- 
tero dìù vicino, il cui valore coniDreso tra 0 e 
255 rappresenta la lunghezza della stringa 
richiesta 


Esempio 




10 A$="D15K BASIC" 

20 PRINT RIGHT$(A5.5) 

RUN 

BASIC 

Ok 




Note 




SE... 


ALLORA. .. 


length=0 


il valore della funzione è la stringa nulla 


length>=LEN(string) 


il valore della funzione è la stringa data 



rs 



SPACES (PROGRAMMA/IMMEDIATO) I 

Fornisce una stringa di spazi della lunghezza richiesta. 



Figura 9-32 Funzione SPACES 
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Dove 



ELEMENTO DI SINTASSI 



SIGNIFICATO 



numeric expression 



viene arrotondata al valore intero più vicino. 
Questo valore deve essere compreso tra 0 e 255 
per evitare l'errore di "lllegal function cali". 



Indica il numero di spazi cioè la lunghezza 
della stringa richiesta 



Esempio 

10 FOR 1=1 TO 5 
20 X$=SPACES(l) 
30 PR1NT X$;l 
40 NEXT 1 
RUN 
1 

2 

3 

4 

5 

Ok 



Note 

Vedasi anche la funzione SPC nel prossimo paragrafo. 



Converte il valore di un'espressione numerica in forma di stringa. 



I STRS (PROGRAMMA/IMMEDIATO) 





numeric 
expression 




Figura 9-33 Funzione STR$ 
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LINGUAGGIO BASIC - MANUALE GENERALE 



FUNZIONI 



Esempi 



VIDEO 




COMMENTI 


5 REM AR1THMET1C FOR K1DS 
10 INPUT "TYPE A NUMBER";N 




Il numero introdotto da 
tastiera viene assegna- 



20 ON LEN (STR$<N)) G05UB 30,100,200,300,400,500 to alla variabile N. 
'. Questo valore viene 

convertito in un valore 
stringa tramite la fun- 
zione STRS. 



LIST 

10 A$ = STRS (70) 
20 PR1NT A$ 
Ok 
RUN 
70 
Ok 



LIST 

10 A!=1.3 

20 A# =VAL(STR$(A!)) 

30 PR1NT A# 

Ok 

RUN 

1.3 
Ok 



70 (argomento di STRS) 
è un numero, ma il 
contenuto della varia- 
bile A$ è una stringa 
di due caratteri, il 
cui valore è ancora 70 
(da intendersi però 
come il carattere ASCII 
7 seguito dal carattere 
ASCII 0) 

La conversione alla 
linea 20 fa sì che il 
valore di A! venga 
memorizzato in A# senza 
perdere precisione 



Note 

VAL esegue la funzione inversa (vedere VAL) 




STR1NGS (PROGRAMMA/ IMMEDIATO) I 



Crea una stringa di una lunghezza specificata, i cui caratteri sono tutti 
uguali o al carattere il cui codice ASCII è specificato, o al primo 
carattere ai una stringa specificata. 
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Figura 9-34 Funzione STRINGS 



Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 


length 


è una espressione numerica arrotondata all'in- 
tero più prossimo. Specifica la lunghezza (da 0 
a 255) della stringa risultante 


numeric expression 


viene arrotondata all'intero più prossimo. 
Specifica il codice decimale ASCII (da 0 a 255) 
il cui carattere corrispondente viene utilizzato 
per formare la stringa richiesta 


string expression 


viene valutata. Il suo primo carattere viene 
utilizzato per formare la stringa richiesta 


Esempio 



10 X$=STRING$(10,45) 

20 PR1NT XS"MONTHLY REP0RT"X$ 

RUN 

MONTHLY REPORT 

Ok 



I VAL (PROGRAMMA/IMMEDIATO) 




Converte la rappresentazione stringa di un numero nel suo valore 
numerico. 
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LINGUAGGIO BASIC - MANUALE GENERALE 



FUNZIONI 





string 




expression 



Figura 9-35 Funzione VAL 



Dove 



ELEMENTO DI SINTASSI SIGNIFICATO 

string expression l'espressione stringa viene valutata. Quando vi 

sono spazi iniziali o finali, caratteri di 
tabulazione o di interlinea questi vengono 
eliminati. La stringa risultante, se è una 
rappresentazione numerica valida, viene conver- 
tita in un numero. Se la stringa comprende un 
carattere non numerico il risultato della 
funzione è zero. Ad esempio: 

VAL (" -3") dà -3 

VAL ("ABC") dà 0 




Esempio 

-— 10 READ NAMES.C1TYS, STATES, Z1PS 

20 1F VAL(Z1P$)<90000 OR VAL(ZIPS) >96699 THEN 

PR1NT NAMES TAB(25) "OUT OF STATE" 
30 1F VAL (ZIPS) =-=90801 AND VAL(ZIPS) <=90815 THEN 

PR1NT NAMES TA8(25) "LONG BEACH" 



Note 



STRS esegue la funzione inversa (vedere STR$). 
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FUNZ1 0N1 DI INPUT/ OUTPUT E FUNZIONI SPECIALI DI SISTEMA 

Queste funzioni facilitano l'esecuzione di operazioni di input/output, 
le conversioni di valori, la gestione degli errori, il posizionamento 
del cursore, le allocazioni delle aree di memoria, ecc. Tali funzioni 
sono elencate qui di seguito. 



Note 



In questo paragrafo includiamo anche le parole stringa riservate DATES e 
TIMES (che possono essere usate o come funzioni, se appaiono in una 
espressione, o come variabili, se scritte alla sinistra del segno di 
uguale in una istruzione di assegnazione). 



DATES/T1MES ( PROGRAMMA/ 1 MHED IATO) 



Sono elementi del PCOS che possono essere letti o inizializzati da BASIC 
per mezzo di questi nomi stringa riservati. 




Figura 9-36 DATES e TIMES 



Note 



La data e l'ora possono essere impostate sia in PCOS per mezzo del 
comando SSYS o in BASIC per mezzo di una istruzione di assegnazione. La 
data può essere impostata sia come mm:dd:yy, o come mm:dd:yyyy. L'ora 
viene impostata come hh:mm:ss. L'utente può usare propri delimitatori. 
(Qualsiasi carattere ASCII tranne le cifre). Per più dettagliate 
informazioni vedere "Professional Computer Operating System (PCOS) - 
Guida Utente". 



9-38 



LINGUAGGIO BASIC - MANUALE GENERALE 



FUNZIONI 



Esempio 


VIDEO 


COMMENTI 


100 1F DATE$="04: 30:82" 
THEN 3000 


l'istruzione 100 controlla che la 
data sia quella desiderata 


500 DATE$="05/06/1981" 


l'istruzione 500 imposta la data 
(cambiando anche il delimitatore) 

l'istruzione 600 visualizza l'ora 


600 PR1NT TIMES 


l'istruzione 700 imposta l'ora 


■ 

700 T1ME$="07:40:15" 






CVD (PROGRAMMA/IMMEDIATO) | 


Converte una stringa di 8 caratteri 


in un numero in doppia precisione. 


Vedere Capitolo 12. 






CV1 (PROGRAMMA/IMMEDIATO) | 


Converte una stringa di 2 caratteri 


in un intero; 


Vedere Capitolo 12. 






CVS (PROGRAMMA/IMMEDIATO) | 



Converte una stringa di 4 caratteri in un numero in singola precisione. 
Vedere Capitolo 12. 
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EOF (PROGRAMMA) 

Dà -1 se viene raggiunta la fine del file. 
Vedere Capitolo 12. 

ERL (PROGRAMMA/IMMEDIATO) 



Dà il numero di linea della linea in cui è stato trovato l'errore. 
Vedere Capitolo 13. 



ERR (PROGRAMMA/IMMEDIATO) 

Dà il numero del codice di errore. 
Vedere Capitolo 13. 



LOC (PROGRAMMA/ 1MME01AT0) 



Dà il numero del record appena letto o scritto (file random), o il 
numero di settori letti o scritti da quando il file è stato aperto (file 
sequenziali) . 

Vedere Capitolo 12. 



LPOS (PROGRAMMA/IMMEDIATO 



Ritorna la posizione attuale della testina della stampante (nell'ambito 
del buffer di linea della stampante). 



dummy 
argumen 



"ho- 



Figura 9-37 Funzione LPOS 
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LINGUAGGIO BASIC - MANUALE GENERALE 



FUNZIONI 



Dove 



ELEMENTO DI SINTASSI 



dummy argument 



SIGNIFICATO 



è una qualsiasi espressione numerica o stringa. 
Il risultato non dipende dall'argomento dato 



Esempio 

100 1F LPOS(X)>60 THEN LPR1NT CHRS(13) 



S (PROGRAMMA/IMMEDIATO) 



Converte un numero in doppia precisione in una stringa di 8 caratteri. 
Vedere Capitolo 12. 



1S (PROGRAMMA/IMMEDIATO) 



Converte un numero intero in una stringa di 2 caratteri. 
Vedere Capitolo 12. 

MKS$ (PROGRAMMA/IMMEDIATO) 

Converte un numero in singola precisione in una stringa di 4 caratteri. 
Vedere Capitolo 12. 



SPC (PROGRAMMA/IMMEDIATO) 



Inserisce gli spazi nelle istruzioni PR1NT o LPR1NT. 
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Figura 9-38 Funzione SPC 


Dove 




ELEMENTO 01 SINTASSI 


SIGNIFICATO 


numeric expression 


viene arrotondata all'intero più vicino. Indica 
il numero di spazi da inserire nell'immagine 
visualizzata sia tra due dati sia all'inizio o 
alla fine dell'immagine. 

Il numero degli spazi deve essere compreso tra i 
valori 0 e 255 (onde evitare l'errore "Il lega 1 



function cali") 



Esempio 

PR1NT "OVER" SPC(15) "THERE' 
OVER THERE 
Ok 



Note 

In una istruzione PRINT o LPR1NT la funzione SPC deve essere seguita o 
da un punto e virgola o da uno spazio. 

Vedere anche la funzione SPACE$. 
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LINGUAGGIO BASIC - MANUALE GENERALE 



FUNZIONI 



TAB (PROGRAMMA/IMMEDIATO) I 

In una istruzione di PR1NT o di LPRINT, la funzione TAB posiziona il 
cursore o la testina della stampante alla posizione specificata. 




Figura 9-39 Funzione TAB 
Dove 



ELEMENTO DI SINTASSI SIGNIFICATO 

numeric expression viene arrotondata all'intero più vicino. 11 

valore dell'espressione deve essere compreso tra 

I e 255 (onde evitare l'errore "Illegal function 
cali"). 

II valore minimo è 1, l'ampiezza della linea -1 
è il limite destro. 

Questo valore specifica la posizione del cursore 
(o della testina della stampante) in una linea. 



Esempio 

10 PR1NT "NAME" TAB(25) "AM0UNT":PR1NT 

20 READ AS.BS 

30 PR1NT A$ TAB(25) BS 

40 DATA "G.T.JONES", "$25. 00" 

RUN 

NAME AMOUNT 

G.T.JONES $25.00 
Ok 
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Note 



Se la posizione del cursore o della testina scrivente della stampante è 
oltre la posizione indicata dal valore dell'argomento, TAB fa si che il 
cursore o la testina si posizionino nella giusta posizione sulla linea 
successiva. 



VARPTR (PROGRAMMA/IMMEDIATO) 




Formato 1. Fornisce l'indirizzo di memoria del primo byte del dato 
associato alla variabile specificata. 



Formato 2. Nel caso di file sequenziali fornisce l'indirizzo iniziale 

del buffer di 1/0 associato al file. Nel caso di file random fornisce 

l'indirizzo iniziale del buffer di 1/0 associato al file, definito 
tramite l'istruzione F1ELD. 



VARPTR 




VARPTR 




file 

number 




Figura 9-40 Funzione VARPTR 
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LINGUAGGIO BASIC - MANUALE GENERALE 



FUNZIONI 



Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


variable name 


qualsiasi tipo di variabile (numerica, stringa o 
matrice). L'indirizzo ritornato sarà un'intero 
compreso tra -32768 e 32767. 

Nota: Se l'indirizzo ottenuto è negativo, si 
deve aggiungere 65536 per ottenere l'indirizzo 
effettivo 


file number 


numero del buffer associato al file 


Esempio 




100 X"*=VARPTR(A(0)) 




Note 





Se, prima dell'esecuzione della VARPTR, non è stato assegnato alcun 
valore alla variabile (e questa è una variabile semplice) si verificherà 
l'errore "Illegal funzione cali". 

La VARPTR viene generalmente usata per ottenere l'indirizzo di una 
variabile o di una matrice affinchè possa essere passata ad un 
sottoprogramma in linguaggio Assembler. La funzione viene usata nella 
forma VARPTR (A(0)) per ottenere l'indirizzo del primo elemento della 
matrice. 
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10. SOTTOPROGRAMMI 



SOMMARIO 



Spesso, una stessa sequenza di istruzioni deve essere eseguita più di una 
volta nell'ambito di uno stesso programma. In questo caso l'utente non 
deve riscrivere questa sequenza più volte, ma può scrivere un sottopro- 
gramma che può essere richiamato in qualsiasi punto del programma. Alla 
fine dell'esecuzione del sottoprogramma, il controllo ritorna all'istru- 
zione successiva a quella del richiamo. 

L'M20 consente di utilizzare due tipi diversi di sottoprogrammi richia- 
mabili da un programma BASIC: 

- sottoprogrammi scritti in BASIC ("BASIC Subroutines") 

- sottoprogrammi scritti in linguaggio ASSEMBLER M20 o comandi PCOS. 

11 seguente capitolo illustra questi due tipi di sottoprogrammi e i 
meccanismi di richiamo. 



INDICE 

BASIC SUBROUTINES 10-1 

GOSUB/RETURN (PROGRAMMA) 10-3 

ON. . . GOSUB/RETURN (PROGRAMMA) 10-7 

COMANDI PCOS RICHIAMABILI 1 0-9 
DA BASIC E SOTTOPROGRAMMI 



ASSEMBLER 

CALL (PROGRAMMA/IMMEDIATO) 10-10 

EXEC (PROGRAMMA/ IMMEDIATO) 10-12 

SYSTEM (PROGRAMMA/ IMMEDIATO) 10-14 

TASTI PROGRAMMABILI 10-14 

TASTIERE CON VERBI BASIC 10-15 

SELEZIONE DA BASIC 10-16 

DELLE UNITA ' DI INPUT/ 

OUTPUT 
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SOTTOPROGRAMMI 



BASIC SUBROUTINES 



Una subroutine BASIC è costituita da un insieme qualsiasi di istruzioni 
BASIC ed è parte integrante del programma. Di norma (ma non necessaria- 
mente) inizia con un'istruzione REM e termina con un'istruzione RETURN. 
E' buona norma di programmazione scrivere le subroutine una dopo l'altra 
alla fine del programma e chiudere il programma principale (prima del- 
l'inizio della prima subroutine) con un'istruzione END, oppure GOTO, 
oppure STOP. 

Una subroutine può essere richiamata da un'istruzione GOSUB oppure 
0N...G0SUB. Alla fine dell'esecuzione della subroutine, il controllo 
ritorna all'istruzione successiva a quella del richiamo. 

Diremo che una subroutine è "pendente" se il controllo non è stato ancora 
restituito al programma principale quando si è verificata una interru- 
zione. Ogni eventuale modifica al programma residente in memoria (can- 
cellazione, modifica di linee ecc..) impedirà di ridare il controllo 
alla subroutine. 



Il seguente esempio illustra il meccanismo di richiamo di una subroutine 
(istruzioni GOSUB e RETURN). 



PROGRAMMA 



COMMENTO 



10 REM Programma 
Principale 



Quando viene eseguita l'istruzione 50 del pro- 
gramma principale (GOSUB) il controllo viene 
trasferito all'istruzione 250 (che è la prima 
istruzione della subroutine). 



p50 GOSUB 250 
60 PRINT X +- 



La subroutine viene quindi eseguita e quando si 
incontra l'istruzione 290 (RETURN), il controllo 
viene trasferito all'istruzione 60, cioè alla 
prima istruzione dopo la GOSUB. 



240 GOTO 500 



L'istruzione 240 (GOTO), evita una eventuale 
attivazione non corretta della subroutine 



L »250 REM Subì 
260 Z=SQR(T) 



290 RETURN 



500 END 
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Se un programma richiama una stessa subroutine più di una volta, alla 
fine dell'esecuzione della subroutine il controllo viene sempre trasferi- 
to alla istruzione successiva all'ultima GOSUB (o ON... GOSUB) che è stata 
eseguita. 

Per esempio, consideriamo un programma che contenga le seguenti istruzio- 
ni : 



PROGRAMMA 

10 REM Programma 
Principale 



COMMENTI 



Quando la subroutine viene attivata tramite 
l'istruzione 50 (GOSUB), il controllo viene 
trasferito, alla fine dell'esecuzione della 
subroutine, all'istruzione 60. 



-50 GOSUB 250 
60 PR1NT X«- 



-140 GOSUB 350 
1 50 1F X • 32 THEN 30^ 



Quando la subroutine viene di nuovo attivata 
tramite l'istruzione 140 (GOSUB), il controllo 
viene trasferito, alla fine dell'esecuzione 
della subroutine, all'istruzione 150 



240 GOTO 500 
•250 REM Subì 
260 Z=SQR(T) 



290 RETURN 



500 END 



Una subroutine può essere anche richiamata da un'altra subroutine. In 
questo caso, diremo che la subroutine richiamata è "nested" (annidata) 
nella subroutine che la ha attivata. 

Questo meccanismo può essere ripetuto più volte: il numero di subroutine 
"nested" contemporaneamente attive, (cioè con istruzione RETURN non 
ancora eseguita), è limitato solo dalla memoria disponibile. 
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Ogni istruzione GOSUB, sia essa nel programma principale o in una subrou- 
tine, viene sempre associata ad una istruzione RETURN. Questa istruzione 
RETURN è quella che trasferisce il controllo all'istruzione successiva 
alla GOSUB. Questo tipo di associazione viene fatto in modo dinamico 
(cioè durante l'esecuzione): la prima istruzione RETURN eseguita viene 
associata all'ultima GOSUB eseguita, la seconda RETURN alla penultima 
GOSUB, e così via. 



PROGRAMMA 



COMMENTO 



10 REM Programma 
Principale 



r-800 GOSUB 158 



810 



1490 END 
►-1500 REM Sub! 



-1900 GOSUB 2500 
1910 •« 



2490 RETURN — 
►2500 REM Sub2 



3000 RETURN ■ 



- 800 GOSUB 1500 trasferisce il controllo alla 
subroutine Subì 

- 1500 REM Subì individua l'inizio della subrou- 
tine Subì 

- 1900 GOSUB 2500 trasferisce il controllo da 
Subì a Sub2 ("nested" subroutine) 

- 2500 REM Sub2 individua l'inizio della subrou- 
tine Sub2 

- 3000 RETURN trasferisce il controllo all'i- 
struzione successiva all'ultima GOSUB eseguita 
(cioè all'istruzione 1910) 

- 2490 RETURN trasferisce il controllo alla 
istruzione successiva alla penultima GOSUB 
eseguita (cioè all'istruzione 810) 



GOSUB/RETURN (PROGRAMMA 



GOSUB richiama una subroutine passando il controllo al primo numero di 
linea della subroutine. 
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RETURN trasferisce il controllo alla prima ist'uzione successiva all'ul- 
tima GOSUB (oppure 0N...G0SUB) eseguita. 




Figura 10-1 Istruzione GOSUB 



Figura 10-2 Istruzione RETURN 




Dove 




ELEMENTO DI SINTASSI 


SIGNIFICATO 


line number è il primo 


numero di linea di una subroutine 


Caratteristiche 


UNA SUBR0UT1NE PUÒ'... 


COMMENTI 


iniziare con qualsiasi istruzio- 
ne (ad esclusione di NEXT e UEND) 


per esempio una subroutine può 
iniziare con REM, LET, F0R,...ecc. 

E' buona norma di programmazione 
iniziare sempre una subroutine con 
REM ( o con un'istruzione che 
termina con un campo commento) 

• 
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finire con un'istruzione RETURN è buona norma di programmazione 

finire sempre una subroutine con 
un'istruzione RETURN. In ogni caso 
RETURN deve essere l'istruzione 
eseguita per ultima, dato che è 
l'unica istruzione che consente di 
ridare il controllo al programma 
principale. 



Una subroutine può avere anche più 
di una istruzione RETURN (ad esem- 
pio quando è strutturata in modo da 
avere più diramazioni ognuna delle 
quali richieda di ridare il con- 
trollo al programma principale) 



essere richiamata in qualunque 
punto del programma, e un numero 
qualsiasi di volte 


se un programma richiama una stessa 
subroutine più di una volta, il 
controllo viene trasferito dalla 
subroutine all'istruzione che segue 
la GOSUB (oppure la 0N...G05UB) 
eseguita per ultima 


essere inserita in qualsiasi 
punto del programma 


però è buona norma di programma- 
zione scrivere le subroutine una 
dopo l'altra alla fine del program- 
ma, e chiudere il programma (prima 
dell'inizio della prima subroutine) 
con un'istruzione END, oppure GOTO, 
oppure STOP 


richiamare un'altra subroutine 


il numero di subroutine "nested" 
contemporaneamente attive, cioè con 
istruzione RETURN non ancora ese- 
guita), è limitato solo dalla 
memoria disponibile 


accedere ad ogni variabile di 
programma 


tutte le variabili definite nel 
programma "principale" sono note 
anche alla subroutine. Queste pos- 
sono quindi operare su ogni varia- 
bile senza restrizioni, (modi- 
ficandone anche il valore) 
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Esempi 



VIDEO 


COMMENTI 


LIST 




questo è un programma atto ad 


10 DEF1NT A-Z 'definisce tutte 


le 


evidenziare l'uso di una subrou- 


variabili intere 




tine. 


20 INPUT "Introduci 3 interi"; 


A.B.C 




30 LET X=A 




La subroutine utilizza l'algoritmo 


40 LET Y=8 




di Euclide, per trovare il massimo 


50 GOSUB 110 




comune divisore (MCD) di tre numeri 


60 LET X=M 




interi (A, B e C). Questi vengono 


70 LET Y=C 




introdotti da tastiera: i primi due 


80 GOSUB 110 




A e B vengono assegnati rispettiva- 


90 PR1NT "MCD di" ; A;B;C"=" ;M 




mente alle variabili X e Y (vedi 


100 GOTO 190 




istruzioni 30 e 40) e la subroutine 


110 LET Q=INT(X/Y) 'subroutine 


per 


determina il loro MCD (vedi istru- 


trovare l'MCD di 


zioni da 110 a 180). 


120 LET R=X-Q*Y 




L'MCD trovato viene assegnato alla 


130 1F R=0 THEN 170 




variabile X nell'istruzione 60 e il 


140 LET X=Y 




terzo numero (C) viene assegnato 


150 LET Y=R 




alla variabile Y nell'istruzione 


160 GOTO 110 




70. 


170 LET M=Y 






180 RETURN 




La subroutine viene richiamata di 


190 END 




nuovo (vedi istruzione 80) per 


Ok 




trovare l'MCD di questi due numeri. 


RUN 






Introduci 3 interi? 1377,2916,405 


Il risultato è l'MCD dei tre nume- 


L'MCD di 1377 2916 405 = 81 




n Feci vonnn nn i/i ^maI 1 77at i in 


OK 




sieme con il loro MCD tramite 


RUN 




l'istruzione 90. 


Introduci 3 interi? 4,3333,67 






L'MCD di 4 3333 67 = 1 




Nota: L'istruzione 10 definisce 


Ok 




tutte le variabili intere, dato che 






il programma opera solo su numeri 






interi 


LIST 




Questo programma calcola la somma 


10 INPUT "Introduci U>0";N% 




dei numeri interi da 1 a N (dove N 


20 IF N%<=0 THEN 10 




è introdotto da tastiera) e su 


30 GOSUB 50 




richiesta, la somma dei quadrati di 


40 END 




questi numeri. 


50 REM SUB1 (Somma di Interi) 






60 S%=(N%*(N%+1 ))/2 




Il programma ha due subroutine SUBÌ 
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70 PRINT "Somma di Interi da 1 

a ";N%;"=";S% 
80 INPUT "Somma di Quadrati 

(S/N)";XS 
90 IF X$="S" THEN GOSUB 110 
100 RETURN 

110 REM SUB2 (Somma di Quadrati) 
1 20 S2%= ( N%* ( N%+1 )* ( 2*N%+1 ) ) /6 
130 PRINT "Somma di Quadrati da 
1 a ";N%;"=";S2% 

140 RETURN 

Ok 

RUN 

Introduci N>0? 5 

Somma di Interi da 1 a 5= 15 

Somma di Quadrati (5/N)? S 

Somma di Quadrati da 1 a 5= 55 

Ok 



e SUB2 inserite alla fine (istru- 
zione da 50 a 100 e da 110 a 140). 

Vengono prima eseguite le istruzio- 
ni 10, 20 e 30. L'istruzione 30 
(GOSUB) richiama la subroutine SUB1 
e le istruzioni di quest'ultima 
vengono eseguite in sequenza fino 
all'istruzione 90. 

Questa esegue un test: 

- se il valore di X$ (introdotto da 
tastiera) è diverso da "S", il 
controllo passa all'istruzione 
100 (RETURN) e quindi all'i- 
struzione 40 (END) 

- se il valore di X$ è uguale a 
"S", viene richiamata la sub- 
routine SUB2 (che è quindi 
"nested"). Quando si arriva alla 
istruzione 140 (RETURN di SUB2), 
il controllo passa all'istruzione 
100 (RETURN di SUB1 ) e quindi 
alla 40 (END). 



ON GOSUB/RETURN (PROGRAMMA) 



L'istruzione ON... GOSUB richiama una subroutine scelta tra n subroutine 
specificate. 

L'istruzione RETURN trasferisce il controllo alla prima istruzione 
successiva all'ultima ON. ..GOSUB (o GOSUB) eseguita. 
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Figura 10-3 Istruzione 0N...60SUB 




Figura 10-4 Istruzione RETURN 



Dove 



ELEMENTO DI SINTASSI 



numeric expression 



SIGNIFICATO 



il suo valore specifica la subroutine da richia- 
mare: 

- Se il suo valore è 1 , viene richiamata la 
subroutine il cui primo numero di linea è il 
primo della lista. 

- Se il suo valore è 2, viene richiamata la 
subroutine il cui primo numero di linea è il 
secondo della lista, e così via. 

- Se il suo valore non è intero, viene arroton- 
dato all'intero più vicino. 

- Se il suo valore è uguale a 0, o è maggiore 
del numero di line number della lista (ma 
minore o uguale a 255), viene eseguita l'i- 
struzione successiva alla 0N...G0SUB. 
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line number 



- Se il suo valore è negativo o maggiore di 255, 
si ha il seguente messaggio d'errore: 

lllegal funtion cali 



ogni line number specificato deve essere il 
primo numero di linea di una subroutine 



Esempio 



VIDEO 


COMMENTI 


LIST 




se l'utente introduce il numero 1, 


10 INPUT 


'Introduci 1 ,2 o 3";K% 


il programma visualizza SUB1 , se 


20 ON K% 


GOSUB 40,50,60 


introduce 2 visualizza 5UB2, se 


30 END 




introduce 3 visualizza SUB3. 


40 PRINT 


'SUBÌ " : RETURN 




50 PRINT 


'SUB2" : RETURN 


In ognuno di questi casi una istru- 


60 PRINT 


'SUB3": RETURN 


zione RETURN trasferisce il con- 


Ok 




trollo alla END; 


RUN 






Introduci 


1,2 o 3? 2 


Se l'utente introduce un intero tra 


SUB2 




0 e 255, diverso da 1 , 2 o 3 il 


Ok 




Drogramma non visualizza nulla. 



CO MANDI PCOS RICHIAMABILI D A BAS IC E SOTTO PROGRAMUI ASSE MBLER 

Le istruzioni CALL ed EXEC consentono di richiamare da BASIC sottopro- 
grammi Assembler o comandi PCOS. 

Entrambe queste istruzioni hanno la stessa funzione ma: 

- EXEC viene usata quando gli argomenti da passare ai corrispondenti 
parametri sono valori costanti; 

- CALL viene usata quando gli argomenti da passare ai corrispondenti 
parametri sono o costanti o variabili di programma. 



10-9 



Le istruzioni CALL ed EXEC possono essere utilizzate sia in un programma 
BASIC sia in modo immediato, ma sono più spesso usate in un programma. 

Alla fine dell'esecuzione di un sottoprogramma Assembler o di un comando 
PCOS, il controllo ritorna all'istruzione seguente a quella del richiamo 
(se CALL o EXEC sono state usate in un programma) oppure ritorna al BASIC 
Stato Comandi (se CALL o EXEC sono state usate in modo immediato). 

L'utilizzo di CALL o EXEC consente di eseguire un programma che interagi- 
sce con il PCOS, per esempio per settare i valori delle variabili globali 
di sistema prima di eseguire altri programmi BASIC o comandi PCOS. 

Alla fine dell'esecuzione di questo programma è possibile restare in 
BASIC o passare in PCOS (tramite il comando SYSTEM). 

Normalmente un tale programma di inizializzazione viene denominato 
1N1T.BAS. 

Questo è un nome di file riservato. L'M20 dopo aver caricato il PC05 e il 
BASIC ricerca questo file su entrambi i drive. Se viene trovato, l'M20 
entra in BASIC ed esegue 1NIT.BAS. 



Note 

Alla fine dell'esecuzione di una istruzione CALL o EXEC che attiva un 
comando SBASIC del PCOS i nuovi valori settati da SBASIC non verranno 
presi in considerazione per il programma attuale (perché potrebbe essere 
distrutto), ma diventeranno operativi per i programmi successivi, quando 
il sistema rientra in BASIC. 

Solo l'istruzione EXEC (non la CALL) consente di selezionare da BASIC le 
unità di input/output (per ulteriori dettagli vedasi "Professional 
Computer Operating System (PCOS)- Guida Utente"). 



CALL (PROGRAMMA/ IMMEDIATO) 



Richiama da BASIC un comando PCOS o un sottoprogramma ASSEMBLER, passando 
al sottoprogramma variabili di programma o costanti. 
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Figura 10-5 Istruzione CALL 



Dove 



ELEMENTO 01 SINTASSI SIGNIFICATO 



subprogram name 




può essere o il nome di un comando PCOS o il nome 
di un sottoprogramma ASSEMBLER. Può essere una co- 
stante stringa o una variabile stringa 


argument 




può essere una costante o una variabile semplice o 
un'espressione il cui valore viene trasferito al 
parametro corrispondente (il meccanismo di passag- 
gio argomenti/parametri è del tutto analogo a quel- 
lo visto per le funzioni - vedi Capitolo 9). 

Se "argument" è un argomento di output (cioè se il 
sottoprogramma ritorna un valore al BASIC), il no- 



me degl'argomento deve essere preceduto dal sim- 
bolo @ . 

Un argomento variabile (di input o di output) deve 
essere inizializzato prima di eseguire la CALL. 

Se l'argomento è numerico deve essere intero. 



Esempi 



VIDEO 




COMMENTI 


10 DEF1NT A-C 




l'istruzione 50 richiama il comando 






PCOS FNEU, passando l'identifi- 






catore di file tramite la variabile 


30 F1LE$="VOL1:FILE001" 




stringa F1LE$ e la dimensione del 


40 S1ZE%=10 




file tramite la variabile numerica 


50 CALL "fn"(F!LE$,SlZE%) 




S1ZE%. 






L'istruzione 100 richiama il coman- 
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90 cs ="list" 

100 CALL "pK"(&41 ,CS) 



220 A = 10 
230 B = 20 
240 C = 200 

250 CALL "SUB121"(A,B,<3)C) 



do PCOS pkey specificando il tasto 
tramite la costante esadecimale S41 
(cioè A, vedere tabella ASCII, 
appendice A) e la stringa corri- 
spondente tramite la variabile CS. 

L'istruzione 250 richiama il sotto- 
programma ASSEMBLER SUB121 passan- 
do due argomenti di input (A e B) e 
uno di output (@C). Si noti che 
questi argomenti sono stati preven- 
tivamente inizializzati . 



Note 

11 comando LTERM del PCOS viene di solito richiamato da BASIC tramite 
l 'istruzione CALL. 

Esso ritorna un valore intero (0, 1, 2) corrispondente all'ultimo tasto 
di chiusura impostazione utilizzato ' | J . HlB OM 

Il comando PCOS CI (Communication Interface) viene di solito richiamato 
da BASIC per inviare o ricevere caratteri in linea tramite la porta 
RS-232-C. 

Altri comandi PCOS (LABEL, SPRINT, BVOLUME, ecc.) sono di solito 
richiamati da BASIC. 

Per ulteriori informazioni vedere "Professional Computer Operating 
System (PCOS) - Guida Utente" e per il comando CI vedere "I/O con 
Periferiche Esterne - G-uiua Utente". 



EXEC (PROGRAMMA/IMMEDIATO) 



Richiama da BASIC un comando PCOS o un sottoprogramma ASSEMBLER, passando 
valori costanti al sottoprogramma. 



Figura 10-6 Istruzione EXEC 



10-12 



LINGUAGGIO BASIC - MANUALE GENERALE 



SOTTOPROGRAMMI 



Dove 



ELEMENTO DI SINTASSI 
string expression 



SIGNIFICATO 



il suo valore viene interpretato come il nome di 
un sottoprogramma seguito da una lista di 
argomenti costanti 



Note 

Se EXEC richiama un comando PCOS, il contenuto della espressione stringa 
dopo EXEC deve coincidere con il comando così come l'utente avrebbe 
dovuto impostarlo per eseguirlo in PCOS. 

Se l'istruzione EXEC richiama un sottoprogramma in linguaggio Assembler, 
il contenuto dell'espressione stringa dopo EXEC è una lista di parametri 
separati da virgole; il primo specifica il nome del sottoprogramma ed i 
successivi specificano gli argomenti da passare al sottoprogramma. 

Nota : Gli argomenti non sono racchiusi in parentesi e possono solo essere 
costanti . 



Esempi 



VIDEO 



100 EXEC "pK ' RUN V1 :CASHFL0W 1 



150 EXEC "fp 1 :MY. FILE/SECRET" 



180 AS="FN 1 :F1LEA,15" 



COMMENTI 



l'istruzione 100 permette di ri- 
chiamare da BASIC il comando PCOS 
PKEY, per assegnare la stringa "RUN 
VI rCASHFLOU" al tasto u . 



Si noti che le stringhe: 

-# 

- RUN V1 :CASHFL0W 

devono essere racchiuse tra apici 
(') come se si operasse in PCOS. 
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230 EXEC AS 



L'istruzione 150 permette di ri- 
chiamare da BASIC il comando PC05 
FPASS per assegnare la password 
SECRET al file MY.F1LE, residente 
sul disco inserito nell'unità 1. 



L'istruzione 230 permette di ri- 
chiamare il comando PCOS FNEW, 
specificando il comando tramite il 
contenuto di una variabile stringa 
inizializzata con l'istruzione 180. 



YSTEM (PROGRAMMA/IMMEDIATO) 



Consente di passare da BASIC a PCOS e di chiudere tutti i file dati. 



Figura 10-7 Comando SYSTEM 



Note 



Il comando SYSTEM permette all'utente di ritornare in PCOS. Può essere 
usato sia in modo immediato sia all'interno di un programma BASIC. Viene 
frequentemente usato come ultima istruzione di un programma di inizializ- 
zazione che utilizza istruzioni CALL ed EXEC per eseguire in sequenza una 
serie di comandi PCOS e/o sottoprogrammi ASSEMBLER. Per maggiori dettagli 
vedere "PCOS (Professional Computer Operating System) - Guide dell'Uten- 
te". 



TASTI PROGRAMMABILI 

Usando i tasti BEU e EBEM i assieme a qualsiasi altro tasto (che 
non sia un tasto shift), l'utente può assegnare un significato partico- 
lare a ogni tasto. 
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Questo può essere un comando PCOS o BASIC, un'espressione, una costante o 
qualsiasi sequenza di caratteri da impostare frequentemente. 

L'assegnazione può essere fatta sia in un programma BASIC per mezzo della 
CALL "pkey" (o EXEC "pkey") o in PCOS per mezzo del comando PKEY. 

A seconda delle esigenze dell'utente, l'assegnazione di una determinata 
funzione ad un tasto può essere permanente (cioè questa funzione può 
venir attribuita in modo automatico ad ogni inizializzazione del sistema 
usando un PCOS "personale") oppure temporanea (cioè valida finché il 
sistema non viene reinizializzato) . Per ulteriori dettagli vedere "PCOS 
(Professional Computer Operating System) - Guida Utente". 



TASTIERE CON VERBI BASIC 

Per definire i tasti con i verbi BASIC (siglati sulla tastiera USA-ASC1I 
+ verbi BASIC e sulla tastiera Inglese) è disponibile un programma di 
nome BKEYBOARD.BAS. 

Questo programma è costituito da una serie di istruzioni PKEY che defini- 
scono i tasti per generare i verbi BASIC, premendo contemporaneamente il 



COMMAND 



tasto 

11 programma risiede sul dischetto standard di sistema. 
L'utente può eseguirlo impostando: 

bk m 

in PCOS, oppure: 

RUN "BKEYBOARD.BAS" Bl 
in BASIC. 

Eseguendo questo programma le definizioni dei tasti restano valide fino 
alla prossima inizializzazione. 

Se l'utente vuole che le definizioni restino valide ad cgni inizializza- 
zione senza bisogno di eseguire ogni volta il programma, deve creare un 
PCOS personale con il comando PSAVE e inizializzare il sistema con quel 
PCOS. 

Per ulterioni dettagli vedere "PCOS - Guida Utente". 
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SELEZIONE DA BASIC DELLE UNITA' DI INPUT /OUTPUT 



SS 



E' possibile da BASIC eseguire un comando PCOS selezionando contempora- 
neamente una unità di I/O (tramite un'istruzione EXEC o CALL). La sele- 
zione permane finché non viene eseguito un altro comando atto a modifi- 
carla o non si esca dall'ambiente BASIC. Se però la EXEC (o la CALL) fa 
una selezione permanente, questa continua ad essere valida anche 
ritornando in PCOS. 



Esempi 



Se l'utente inposta... 
ba HM 

EXEC "vi 1:,+01:0UT" tÀM 
EXEC "-D1 :0UT" I£| 



ba IìJ 



EXEC "vi 1 : ,+dprt;" MUM 



SYSTEM M3M 



ALLORA. .. 



il sistema carica in memoria l'interprete 
BASIC ed entra in BASIC (Stato Comandi). 
La prima istruzione EXEC provoca la visua- 
lizzazione della directory del dischetto 
inserito nel drive 1 e la registrazione di 
quanto appare su video anche sul file di 
nome OUT. 

Questo file viene creato, se non esiste sul 
dischetto specificato. Se esiste lo rico- 
pre. 

Il file viene disabilitato come unità di 
output dalla seconda istruzione EXEC. 

il sistema entra in BASIC. 

L'istruzione EXEC provoca la visualizzazio- 
ne e la stampa della directory del dischet- 
to inserito nel drive 1. 

11 comando SYSTEM fa ritornare in PCOS e 
disabilita la stampa come unità di output. 
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ba B:l 



EXEC "+prt" fSM 



SYSTEM E£M 



il sistema entra in BASIC. 

L'istruzione EXEC provoca la stampa di 
quanto viene visualizzato su video (sele- 
zione permanente). 

11 comando SYSTEM fa ritornare in PC05, ma 
non disabilita la stampa di quanto appare 
su video, dato che la EXEC ha fatto una 
selezione permanente. 
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11. SEGMENTAZIONE DEI PROGRAMMI 



SOMMARIO 

In questo capitolo illustreremo la tecnica di segmentazione dei 
programmi e le modalità di passaggio dei dati da un programma a un 
altro. 

Esamineremo in particolare l'istruzione CHAIN (con tutte le sue opzioni) 
e l'istruzione COMMON. Inoltre ricorderemo l'uso dei comandi RUN e LOAD 
con l'opzione R. 
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SEGMENTAZIONE DEI PROGRAMMI 



QUANDO USARE LA SEGME NTAZIONE DEI PROGRAMMI 

La segmentazione dei programmi significa realizzare una successione di 
programmi semplici invece di un unico programma complesso. 

Questi programmi che devono essere eseguiti uno dopo l'altro, risolvono 
lo stesso problema di un unico programma complesso. Usando questa 
tecnica, l'utente può eseguire programmi che altrimenti non potrebbero 
essere caricati nella memoria dell'M20: la segmentazione dei programmi è 
una tecnica che può essere utile anche in molti altri casi, alcuni dei 
quali sono indicati nella seguente tabella. 



SE. .. 


ALLORA... 


un programma non può essere con- 
tenuto nella memoria disponibile 


è necessario, per poterlo esegui- 
re, suddividerlo in due o più 
programmi più semplici, da esegui- 
re in tempi successivi 


un programma contiene delle parti 
che vengono eseguite raramente 


min accodo "Ifì^rtlIfT^ t~t\f1^T^^3^0 

può essere opportuni) cuuiiiuaic 
queste parti come programmi di- 
stinti da richiamare in memoria 
quando necessario 


un programma ha una parte che deve 
essere sempre residente, mentre 
altre parti possono risiedere in 
memoria temporaneamente (tipi- 
camente queste parti sono routine 
standard che possono essere utiliz- j 
zate da molti programmi) 


può essere opportuno codificare 
queste parti come programmi di- 
stinti: il segmento che deve 
essere sempre residente ("radice") 
richiamerà in memoria per l'esecu- 
zione il primo segmento transiente 
(overlay). 11 secondo overlay 
verrà quindi richiamato in memoria 
o dal primo overlay o dalla stessa 
radice. 

Ognuno di questi overlay verrà 
ricoperto (tutto o in parte) dal 
successivo 


un programma è decomponibile in 
parti funzionali distinte 


può essere opportuno codificare 
queste parti come programmi di- 
stinti al fine di ridurre i costi 
di programmazione 
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TRASFERIMENTO DATI 



La segmentazione dei programmi comporterà la necessità di trasferire 
dati da un programma al successivo. Ciò può essere fatto in vari modi, 
come indicato dalla seguente tabella. 



SE si utilizza. . . 



CHAIN insieme a 
una o più istruzio- 
ni COMMON 



CHAIN con l'opzio- 
ne ALL 



CHAIN e il pro- 
gramma attuale accede 
ad uno o più fi le 
dati 



RUN o LOAD con 
l'opzione R, e il 
programma attualmente 
in memoria accede 
a uno o più file 
dati 



ALLORA. .. 

il BASIC crea un'area "common" che non viene 
ricoperta dal programma concatenato (il program- 
ma residente in memoria viene invece ricoperto). 

L'area "common" contiene tutte le variabili 
specificate nell'istruzione COMMON; il programma 
concatenato può accedere a queste variabili. 

tutte le variabili definite dal programma resi- 
dente in memoria, vengono trasferite al program- 
ma concatenato. 

il trasferimento dei dati può avvenire anche 
tramite l'utilizzo di questi file. 

L'istruzione CHAIN non chiude i file dati. 

L'utilizzo dei file dati è compatibile con: 

- le istruzioni CHAIN e COMMON 

- l'istruzione CHAIN con l'opzione ALL 

- l'istruzione CHAIN con l'opzione MERGE (ed 
eventualmente DELETE - vedere la spiegazione 
dell'opzione DELETE più avanti in questo 
capitolo ) . 

il trasferimento dati avviene tramite l'utilizzo 
di questi file. I commandi RUN o LOAD con 
l'opzione R non chiudono i file dati. 
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CONCATENAMENTO DEI PROG RAMMI 

Come abbiamo già visto, la segmentazione dei programmi può essere 
realizzata tramite: 



- le istruzioni CHAIN e COMMON 



- i comandi RUN e LOAD 



L'istruzione CHAIN, con tutte le sue opzioni, fornisce un mezzo potente e 
flessibile per la segmentazione dei programmi. 

L'istruzione CHAIN può essere utilizzata secondo tre modalità distinte: 

- insieme a una o più istruzioni COMMON, in modo da trasferire l'area 
common al programma concatenato 

- con l'opzione MERGE per poter inserire il programma concatenato nel 
programma residente in memoria (l'opzione DELETE viene spesso usata in 
questo caso per cancellare una parte del programma a fine esecuzione, 
consentendo così di eseguire una serie di "overlay") 

- con l'opzione ALL per passare tutte le variabili al programma con- 
catenato 



CHAIN (PROGRAMMA) 



Consente di concatenare il programma specificato a quello attualmente in 
memoria permettendo il trasferimento delle variabili. CHAIN lascia i file 
dati aperti e conserva il valore iniziale dell'indice (0 oppure 1) degli 
elementi delle matrici. 




Figura 11-1 Istruzione CHAIN 
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Dove 



ELEMENTO DI SINTASSI 



MERGE 



file identifier 



line number expres- 
si on 



SIGNIFICATO 



viene eseguita un'operazione di MERGE tra il 
programma attualmente in memoria e il programma 
concatenato. Quest'ultimo deve essere stato 
registrato su disco in formato ASCII. 

Se l'opzione MERGE viene omessa, il programma 
attualmente in memoria viene ricoperto dal 
programma concatenato (ad esclusione dell'even- 
tuale area "common"). 

MERGE viene spesso usata con l'opzione DELETE e 
line number expression per eseguire una sequenza 
di "overlay" (v. Esempi). 

Nota : l'opzione MERGE non modifica i tipi delle 
variabili. Le variabili definite nel programma 
concatenante possono quindi essere usate nel 
programma concatenato. Le funzioni definite 
dall'utente invece resteranno indefinite dopo che 
l'operazione di MERGE è stata ultimata. 



è un'espressione stringa che specifica il 
programma da concatenare 



può essere un numero di linea o una espressione 
il cui valore rappresenta un numero di linea del 
programma concatenato. 

Questo parametro individua la linea del program- 
ma concatenato che viene eseguita per prima. 
Questo parametro viene spesso usato insieme con 
MERGE e DELETE per eseguire una sequenza di 
overlay. Se questo parametro è omesso, il 
programma concatenato viene eseguito a partire 
dal! 'inizio . 

Nota : Il comando RENUM non modifica il valore di 
questo parametro 
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ALI 


se l'istruzione CHAIN comprende l'opzione ALL, i 




valori di tutte le variabili del programma 




attualmente in memoria, vengono trasferiti al 




programma concatenato. 




Se l'fin^innp Ali nn n vipnp ^nprifirat'fl i driti 




vengono trasferiti tramite l'area "common" e/o 




tramite l'uso di file dati. 


DELETE 


specifica (tramite numeri di linea) che una 




sezione del programma attualmente in memoria 




deve essere cancellata. 




La cancellazione avviene prima che il programma 




concatenato sia caricato in memoria. 




DELETE è spesso usato insieme con MERGE e line 




number expression per eseguire una sequenza di 




"overlay" . 




Nota: 1 numeri di linea usati dopo DELETE 




vengono modificati se si esegue un comando 




RENUM. 



Esempi 



VIDEO 



10 REM PR0G1 

20 COMMON A1 ,B1 ,C1S 



100 CHAIN "PR0G2" 
110 END 



COMMENTI 

il programma PR0G1 concatena il 
programma PR0G2 e trasferisce a 
PR0G2 i valori Al , B1 , CI $ (tramite 
l'uso di un'area "common"). 



PR0G2 risiede sul disco inserito 
nell'ultima unità selezionata. 



► 
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10 REM PR0G2 

20 COMMON A2S, B2S 



80 CHAIN "PROG3",200 
90 END 



10 REM PROG10 



CHAIN "1:PROG11", 100, ALL 
END 



il programma PROG2 concatena PROG3 
e trasferisce a PR0G3 i valori di 
A2S e B2$ (tramite l'uso di 
un'area "common"). 

11 programma PR0G3 viene eseguito 
a partire dalla linea 200. 

PR0G3 risiede sul disco inserito 
nell'ultima unità selezionata. 



il programma PROG10 concatena 
PR0G11 e trasferisce a questo 
tutte le sue variabili. 

PR0G11 viene eseguito a partire 
dalla linea 100. 

PR0G11 risiede sul dischetto inse- 
rito ne 11 'unità 1 . 



10 REM ROOT il programma ROOT concatena con 

l'opzione MERGE il programma 



100 CHAIN MERGE "V1 :0VERLAY1", 1000 
110 END 




0VERLAY1 (registrato in formato 
ASCII sul disco V1 ). 

Questo viene eseguito a partire 
dalla linea 1000 


1000 REM 0VERLAY1 




il programma 0VERLAY1 concatena 
con l'opzione MERGE il programma 
0VERLAY2 (registrato in formato 



ASCII sul disco VI ). 

1500 CHAIN MERGE "V1 :0VERLAY2" , 

1000, DELETE 1000-1500 
1510 END 



Questo viene eseguito a partire 
dalla linea 1000. Prima del suo 
caricamento però le istruzioni 
dalla linea 1000 alla 1500 vengono 
cancellate 
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COMMON (PROGRAMMA) 



Definisce un'area common che non viene ricoperta dal programma concate- 
nato e permette il trasferimento delle variabili. 




Figura 11-2 Istruzione COMMON 
Esempi 



VIDEO 



COMMENTI 



10 REM PG1 Le istruzioni COMMON vengono usate unitamente 

20 COMMON A1,B1,C1,D1S all'istruzione CHAIN. 



80 CHAIN "V0L2:PG2" 
90 END 

10 REM PG2 

20 PR1MT Al ,B1 ,C1 ,01$ 



Un programma può avere una o più istruzione 
COMMON . 

le variabili specificate in queste istruzioni 
vengono allocate nell'area common a partire 
dall'inizio dell'area e secondo la sequenza di 
scrittura nel programma. 



120 END 



11 programma concatenato non deve necessa- 
riamente specificare, tramite istruzioni COMMON, 
le variabili COMMON specificate dal programma 
concatenante. 

11 prcgrji.ima concatenato farà riferimento a 
qjeste variabili usando gli stessi nomi indicati 
nel programma concatenante. 
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Nel nostro esempio i valori delle variabili 
A1,B1,C1 e DI $ del programma PG1 vengono 
trasferiti al programma concatenato PG2, che ne 
visualizza i valori (vedi istruzioni 20). 



10 REM PG1 
20 DEFDBL C 
30 COMMON Al ,81 .CI .DI S 



90 CHAIN "V0L2:PG2" 
100 END 



Eventuali istruzioni di definizione di tipo 
(DEFINT, DEFSNG, DEFDBL, DEFSTR) relative a 
variabili common devono precedere le istruzioni 
COMMON e dovranno apparire anche nel programma 
concatenato in modo da conservare la coerenza 
dei tipi delle variabili. Si noti in questo caso 
la presenza delle due istruzioni DEFDBL nei due 
programmi PG1 e PG2 



10 REM PG2 
20 DEFDBL C 



130 END 



10 REM PR0GRAM1 
20 COMMON A$,B$,C$ 
30 COMMON A$,A1 



100 END 



10 REM PG1 

20 D1M Al (15,20) 

30 COMMON A1(),B1,C1 



100 CHAIN "V0L2:PG2" 
110 END 
10 REM PG2 

50 PRINT AK1.1) 
90 END 



E 'buona norma di programmazione non scrivere uno 
stesso nome di variabile (in questo caso A$) in 
istruzioni COMMON diverse nell'ambito dello 
stesso programma (né più di una volta in una 
stessa istruzione COMMON). 

In ogni caso le definizioni multiple sono 
equivalenti a una singola. 



un'istruzione COMMON può specificare anche noni 
di matrici. In tal caso questi nomi devono 
essere seguiti da una coppia di parentesi. Ogni 
matrice indicata in una istruzione COMMON deve 
anche essere dimensionata tramite un'istruzione 
D1M nel programma concatenante (ma non nel 
programma concatenato, altrimenti si verificherà 
un errore "Duplicate Definicion in line..."). 

L'istruzione DIM deve precedere l'istruzione 
COMMON associata. 
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13 REM modi 

1 »' libi 1 n»ww » 




1 istruzione L-Ui li IUm nd un VdlUi c uiLiiiaiaLivu 


20 A=1 : B=2 




*\r»ir*kfcs\ r n f \ n w i A ù cani 1 1 ^ a ili OHnA ^ 1 

erneace ancne se non viene eseguite», uuomuu ai 


jtf LUI II IVJ M n | u 




esegue "modi" si ha "Illegal function cali in 


uu i u ov 




50 perche la variabile C non e definita. 


cri rnMMflN r 

DV LUI II lUll L 






60 CHAIN "mod3" 




Eseguendo invece "mod2", viene chiamato il 


1Cf RFM mori? 




programma "mod3" che visualizza sia la variabile 




A che la variabile B, anche se la linea 50 di 


20 A=1:B=2 




"mod2" è stata "saltata". 


30 COMMON A 






10 GOTO 60 






50 COMMON B 






60 CHAIN "mod3" 






10 REM mod3 






20 PRINT A;B 







Nota 

Le variabili common devono essere inizializzate nel programma concate- 
nante. 
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12. GESTIONE DI UN FILE SU DISCO 



SOMMARIO 

Questo capitolo descrive i due tipi di file dati disponibili in BASIC: 

- i file sequenziali (sequential file) 

- i file ad accesso diretto (Random file) 

Esamineremo come questi file vengono creati, aperti, chiusi e come sia 
possibile leggerli e scriverli. 
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GESTIONE DI UN FILE SU DISCO 



FILE SEQUENZIALI E AD ACCESSO DIRETTO 

Un file dati viene creato (cioè reso noto al sistema) tramite: 

- il comando FNEU del PCOS, che ne stabilisce il nome e l'estensione 
iniziale, 

oppure 

- l'istruzione OPEN, che consente di accedere al file da programma. 

L'istruzione OPEN attribuisce anche il nome a un file che non sia già 
stato creato tramite FNEU o un'altra OPEN. In ogni caso OPEN associa un 
buffer dati al file (utilizzato dal programma per ogni operazione di 
Input/Output) e specifica il metodo d'accesso. 

Useremo il comando FNEU invece dell'istruzione OPEN per creare un file 
dati molto esteso di cui si conosca sufficientemente bene la dimensione 
finale. FNEW riserva un certo numero di settori contigui su disco al 
file. Ciò può rendere più efficienti le operazioni di Input/Output. 
Inoltre FNEU garantisce che ci sia spazio sufficiente a contenere il file 
su disco. 

Dal punto di vista implementativo esiste un solo tipo di file (byte 
stream); ogni file può però essere aperto secondo quattro diversi metodi 
d'accesso (Input, Output, Append e Random). 1 primi tre permettono un 
accesso di tipo sequenziale (si parla quindi di file sequenziali), mentre 
l'ultimo ammette esclusivamente l'accesso random (si parla quindi di file 
ad accesso diretto). Il metodo d'accesso di un file può essere modificato 
ogni volta che il file viene riaperto. 

La seguente tabella riassume le caratteristiche fondamentali dei file 
dati, classificando i file (dal punto di vista utente) in due categorie: 
sequenziali e ad accesso diretto. 
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TIPO DI FILE 

Sequenziale (o 
"Stream-oriented") 



Ad Accesso Diretto 
(o "Record-oriented" 



CARATTERISTICHE 

un file sequenziale è 
una sequenza di carat- 
teri ASCII senza alcun 
criterio di raggruppa- 
mento. 11 numero di da 
ti letti o registrati 
in ogni operazione di 
Input/Output può varia 
re ed è di nonna dete£ 
minato dal numero di 
variabili specificate 
nell 'istruzione 



Un file ad accesso di- 
retto è una sequenza di 
dati raggruppati in 
record. 

Ogni istruzione di 
Input/Output può legge- 
re o registrare un re- 
cord alla volta. 

1 record di un file 
ad accesso diretto 
hanno tutti la stessa 
lunghezza e la stessa 
struttura . 



ir 



METODO D'ACCESSO 



Input: lettura sequen- 
ziale (un dato dopo 
l'altro) dall'inizio 
del file 

Output: registrazione 
sequenziale dall'ini- 
zio del file. I dati 
presenti precedente- 
mente sul file sono 
persi 

Append: registrazione 
sequenziale dalla fine 
del file preesistente. 
1 dati presenti nel 
file non sono persi. 

Random: 

accesso diretto in 
lettura o registrazio- 
ne al record specifi- 
cato. 



FILE SEQUENZIALI 

I file sequenziali rappresentano il modo più semplice di memorizzare i 
dati. 

Conviene utilizzare file sequenziali quando i dati hanno un formato 
libero (cioè non si possono raggruppare in record). 

1 dati vengono scritti su un file sequenziale uno dopo l'altro (in 
sequenza) e vengono poi letti nello stesso ordine. Si tengano presenti i 
seguenti punti: 
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- quando un file sequenziale viene aperto in - Output, i dati vengono 
registrati in sequenza a partire dall'inizio del file. Se il file 
conteneva in precedenza dei dati, questi vengono persi. 

- quando un file sequenziale viene aperto in Append, i dati vengono 
registrati in sequenza dopo l'ultimo dato sul file. 

- per aggiornare un file sequenziale è necessario aprirlo in lettura 
(Input), leggerne i dati, aggiornarli e riscriverli su un nuovo file 
sequenziale aperto in scrittura (Output). 

- i dati scritti su un file sequenziale includono di norma dei delimitato 
ri che specificano dove ogni dato inizia e finisce. 

- per leggere un file sequenziale l'utente deve aprirlo in Input e deve 
conoscere il formato dei suoi dati; per esempio se sul file sono 
memorizzati valori numerici separati da spazi o valori numerici e 
stringa separati da virgola. 

- i dati su un file sono sempre registrati come una stringa di caratteri 
(un byte per ogni carattere del dato). Per esempio il numero: 

351.27 

richiede 6 byte di memoria su disco, esclusi i delimitatori (che 
possono essere spazi o virgole). 



FILE AD ACCESSO DIRETTO 

Conviene utilizzare file ad accesso diretto quando è possibile raggrup- 
pare i dati in "record", aventi tutti una data lunghezza. 

1 file ad accesso diretto richiedono un maggior numero di passi di 
programma che non i file sequenziali, ma presentano vari vantaggi: 

- invece di iniziare a leggere o a scrivere un file dall'inizio, l'utente 
può leggere o scrivere un record qualsiasi del file. 

per aggiornare un file, non è necessario leggere l'intero file, 
aggiornare i suoi dati e scriverli su un altro file. L'utente può 
riscrivere o aggiungere un qualsiasi record senza dover accedere a 
tutti i record precedenti. 

l'apertura di un file ad accesso diretto consente sia di scrivere che 
di leggere record dal file utilizzando lo stesso "buffer" per entrambe 
le operazioni. 
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APERTURA E CHIUSURA DI UN FILE 

Per accedere a un file dati da programma, l'utente deve aprirlo tramite 
un'istruzione OPEN. Questa specifica l'identificatore di un file, il 
metodo d'accesso, il numero dei file e, limitatamente ai file ad accesso 
diretto, la lunghezza dei record. 

11 massimo numero di file aperti contemporaneamente può essere stabilito 
tramite il comando SBASIC del PCOS, o può essere assunto per default (in 
quest'ultimo caso il suo valore è 3). 11 numero massimo non può mai 
superare 15. 

Ogni volta che l'utente apre un file, un buffer viene associato al file. 
Ogni buffer ha un numero compreso tra 1 e 15. Il numero di buffer viene 
anche detto numero di file; esso viene usato in ogni operazione di 1/0 
per far riferimento al file preceduto dal simbolo # (che è però opzionale 
in alcune istruzioni). 11 buffer è un'area di transito per i dati che 
devono essere letti o scritti su file. 

Per i file ad accesso diretto, l'utente deve stabilire la struttura del 
buffer (cioè dei record nel file) fissando la lunghezza (in caratteri) di 
ogni dato all'interno del buffer tramite l'istruzione F1ELD. 

L'utente per accedere a un dato file con un'istruzione di input/output, 
farà riferimento al file tramite il numero del file e non tramite il suo 
identificatore. 

Quando l'utente chiude un file, tramite l'istruzione CLOSE, viene can- 
cellata l'associazione, fatta dalla OPEN, tra il file e il buffer, e non 
è più possibile accedere al file, a meno che non venga aperto di nuovo. 
Quando l'utente riapre un file, tramite un'altra OPEN, può associare al 
file lo stesso o un altro buffer. 



OPEN ( PROGRAMMA/ 1MMED IATO) 



m 



Apre un file dati consentendo l'accesso da programma. 

Se il file non è già stato creato la OPEN crea anche il file (però 
l'utente non può creare un file aprendolo con metodo d'accesso "1") 
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Dove 



ELEMENTO DI SINTASSI 



access mode 



SIGNIFICATO 



è una costante o una variabile stringa il cui 
valore può essere: 

- "A", cioè Append : predispone la registrazione 
sequenziale dei dati dopo l'ultimo dato. 11 
file è sequenziale. I dati presenti sul file 
non vengono persi, i nuovi dati vengono 
aggiunti di seguito a quelli esistenti 



"I" cioè Input : predispone la lettura 
sequenziale dei dati a partire dall'inizio dal 
file. 11 file è sequenziale 

"0" cioè Output : predispone la registrazione 
sequenziale dei dati a partire dall'inizio del 
file. 11 file è sequenziale. Se il file 
conteneva già dei dati questi vengono persi. 

"R" cioè Random i record potranno essere 
letti o scritti in qualsiasi ordine. In questo 
caso il file è ad accesso diretto. 



file number 



N.B. Se un file sequenziale è vuoto (cioè non 
contiene dati) i metodi di accesso A e 0 
sono equivalenti 



è una espressione numerica, il cui valore 
(arrotondato all'intero più vicino) deve essere 
compreso tra 1 e 15. 

Il numero di file specificato rimane associato 
al file per tutto il tempo in cui il file resta 
aperto e viene usato per specificare il file in 
ogni istruzione di 1/0 



file identifier 



è una costante o una variabile stringa e può 
specificare: 

- un file nuovo (cioè sconosciuto al sistema). 
In questo caso il file viene creato (ad 
esclusione dei file aperti con metodo d'acces- 
so "1"). 

- un file già esistente. In questo caso il file 
viene soltanto aperto. 
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record length è un'espressione numerica (arrotondata all'in- 

tero più vicino) che, se specificata, stabilisce 
la lunghezza dei record di un file ad accesso 
diretto. 

Questo parametro può essere specificato solo per 
i file ad accesso diretto. 11 suo valore di 
default è 256 byte. 11 suo valore massimo è dato 
dal parametro record size del comando SBASIC del 
PCOS. 1 valori ammessi del record size vanno da 
1 a 4096 (con un valore di default di 256 
bytes) . 

"~\ 



Esempi 



VIDEO 



50 OPEN "A",1 ,"V1 .-EXAMPLE" 



160 OPEN "0",2,"V1 :TEST" 



270 OPEN "R",3,"V2:F1",80 
280 OPEN "R",4,"V2:F2",20 



490 CLOSE 2 

500 OPEN "1",5,"V1 :TEST' 



OPEN "R",2,FILES,RN 



COMMENTI 



L'istruzione 50 apre il file sequenziale 
EXAMPLE residente sul disco VI in Append, e 
associa al file il buffer numero 1. 
L'istruzione 160 apre il file sequenziale 
TEST, residente sul disco VI, in Output e 
associa al file il buffer numero 2. 
L'istruzione 270 apre il file ad accesso 
diretto F1 , residente sul disco V2, associa 
al file il buffer numero 3 e stabilisce la 
lunghezza dei record pari a 80 byte. 
L'istruzione 280 apre il file ad accesso 
diretto F2, residente sul disco V2, associa 
al file il buffer numero 4 e stabilisce la 
lunghezza dei record pari a 20 byte. 
L'istruzione 490 chiude il file TEST. 
L'istruzione 500 riapre il file TEST in 
Input e associa al file il buffer numero 5. 
L'istruzione 600 apre un file ad accesso 
diretto il cui identificatore è il contenu- 
to della variabile stringa F1LE$. La 
lunghezza dei suoi record è data dal valore 
della variabile numerica RN. 11 buffer 
associato è il buffer 2 reso disponibile 
dopo l'istruzione 490. 
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LINGUAGGIO BASIC - MANUALE GENERALE 



GESTIONE DI UN FILE SU DISCO 



Nota 

Non è possibile creare un file con un'istruzione OPEN, se viene 
specificato come metodo di accesso "I". Un eventuale tentativo si risolve 
in un errore per "File not found" 



CLOSE (PROGRAMMA/IMMEDIATO) 



Chiude i file dati 




Figura 12-2 Istruzione CLOSE 



Dove 



ELEMENTO DI SINTASSI 
file number 



SIGNIFICATO 

è un'espressione numerica il cui valore arroton- 
dato rappresenta il numero del buffer associato 
al file. Questo numero deve essere compreso tra 
1 e 15. Un'istruzione CLOSE senza parametri 
chiude tutti i file che erano stati aperti. 
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Esempi 



VIDEO 



COMMENTI 



170 CLOSE # 2 
250 A=6 

290 CLOSE 3.5.A 



1200 CLOSE 



L'istruzione 170 chiude il file associato al 
buffer numero 2. 

L'istruzione 290 chiude i file associati ai 
buffer numero 3,5 e 6 (se A vale 6). 
L'istruzione 1200 chiude tutti i file. 



Caratteristiche 



SE... 

viene eseguita un'istru- 
zione CLOSE 



viene eseguita una un'i- 
struzione END o un coman- 
do SYSTEM 

l'utente imposta MfcTM 



ALLORA... 



l'associazione tra il file che è stato chiuso 
e il suo buffer viene annullata; il buffer 
può allora essere riutilizzato per aprire 
qualsiasi file. 

Un file che è stato chiuso può essere 
riaperto tramite una istruzione OPEN (nel- 
l'ambito dello stesso o di un altro program- 
ma). La OPEN può associare al file qualsiasi 
buffer che in quel momento sia libero 



tutti i file aperti vengono chiusi 



tutti i file aperti vengono chiusi e tutti i 
dati nei buffer di 1/0, non ancora registrati 
su disco, vengono persi 
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LINGUAGGIO BASIC - MANUALE GENERALE 



GESTIONE DI UN FILE SU DISCO 



viene fatta una qualsiasi 
modifica al programma 
(inserimento, modifica 
di linee etc. . . ) 



tutti i file aperti vengono chiusi 



viene eseguita una istru- 
zione CHAIN, oppure un 
comando LOAD (o RUN) con 
l'opzione R 

si ha un'interruzione del 
programma (a seguito di 
una istruzione STOP, di 
un messaggio d'errore, 
dell'impostazione di 

si cerca di chiudere un 
file già chiuso o non 
ancora aperto 



nessun file viene chiuso 



nessun file viene chiuso 



l'istruzione non ha effetto 



Note 

E' sempre conveniente chiudere un file quando non si ha più bisogno di 
elaborarlo, a meno di dover concatenare un altro programma al programma 
attuale (tramite CHAIN o RUN con l'opzione R o LOAD con l'opzione R) per 
accedere allo stesso file con lo stesso metodo di accesso. 

Un comando LOAD oppure RUN (senza l'opzione R) oppure un comando SAVE, 
chiudono tutti i file che sono ancora aperti. 



SCRITTURA DI UN FILE SEQUENZIALE 

11 file deve essere aperto con metodo d'accesso Output ("0") o Append 
("A") 

Le istruzioni di Output sono PR1NT# , PR1NT# US1NG e URITE tf. PR1NT » e 
URITE » scrivono i dati in un formato standard, mentre PR1NT# US1NG 
scrive i dati in un formato definito dall'utente. La differenza tra 
PR1NT # e URITE # è che: 
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- PR1NT # registra su disco i dati nello stesso formato standard col 
quale l'istruzione PR1NT li visualizza su video. 



- URITE tt registra su disco i dati nello stesso formato standard col 
quale l'istruzione URITE li visualizza, cioè inserisce una virgola tra 
un dato e il successivo ed inoltre registra il carattere virgolette 
davanti e alla fine di ogni valore stringa. 

Nota : Può essere usata la funzione LOC per sapere il numero di settori 
(blocchi di 256 byte) registrati nel file da quando è stato aperto, al 
fine di evitare il messaggio d'errore "Disk full" 

1 seguenti passi di programma sono necessari per scrivere dati su un file 
sequenziale. 



PASSO 


AZIONE 


ESEMPI 


; 


L'utente deve aprire il file 
specificando il metodo d'acces- 
so "0" oppure "A" 


10 OPEN "0",1,"1:F1" 


2 


L'utente deve scrivere una serie 
di valori numerici e/o stringa 
sul file, usando delle istruzioni 
di Output 


50 URITE'/ 1 ,A$,B,CS 

U — 


3 


L'utente deve ripetere il 






passo 2 per ogni operazione 






di Output 








150 URITE # 1 ,A1 ,B1 ,C1$ 


1 




180 URITE # 1 ,A2,B2$,C2,D2 



► 
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LINGUAGGIO BASIC - MANUALE GENFRAi F 



GESTIONE DI UN FILE SU DISCO 



Quando non ci sono più dati da re- 
gistrare, l'utente deve chiudere il 
file (a meno che non debba essere 
riutilizzato con lo stesso me- 
todo d'accesso da un altro pro- 
gramma concatenato al precedente) 



300 CL0SE«1 



PR1NT# (PROGRAMMA/IMMEDIATO) 

Registra dati su un file sequenziale, usando lo stesso formato standard 
utilizzato da un'istruzione PRINT. 




•Or 



—Q- 



Figura 12-3 Istruzione PRINT» 



Dove 



ELEMENTO DI SINTASSI 
file number 



expression 



SIGNIFICATO 



è un'espressione numerica il cui valore arroton- 
dato specifica il numero del buffer associato al 
file. 



può essere un'espressione numerica, di relazio- 
ne, logica o stringa, il cui valore viene 
registrato sul file. 



Note 



Poiché i dati vengono registrati su disco nello stesso formato in cui 
apparirebbero su video con l'istruzione PR1NT, l'utente deve fare 
attenzione a registrare i dati con gli opportuni delimitatori in modo da 
poterli poi rileggere in modo corretto. 



Caratteristiche 


SE. .. 


ALLORA. .. 


viene eseguita un'istru- 
zione PR1NT# 


i dati vengono registrati in modo sequenziale 
sul file specificato 


il file viene aperto 
in Output ("0") 


il pointer viene posto all'inizio del file, 
quindi la prima PRINT» registra i dati a 
partire dall'inizio del file 

Ad ogni operazione PR1NT# ,il pointer avan- 
za, sicché i valori vengono registrati in 
sequenza 


il file viene aperto in 
Append ("A") 


il pointer è posto alla fine, quindi la prima 
PR1NT tt registra i dati dopo l'ultimo dato 
presente nel file. Ad ogni operazione 
PR1NT # il pointer avanza, sicché i valori 
sono registrati in sequenza 


l'utente vuole scrivere 
correttamente la lista 
PR1NT II per leggere poi 
i dati registrati tramite 
una o più istruzioni 
INPUT # 


deve tener presente che un'istruzione 
PR1NT # crea una stringa su disco simile a 
quella che crea una PR1NT sul video 

PR1NT» registra una stringa di dati codifi- 
cata ASCII. La punteggiatura nella lista 
PR1NT* è molto importante 

La virgola e il punto e virgola non racchiusi 
tra virgolette hanno lo stesso effetto di 
quando sono presenti nelle istruzioni PR1NT 
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LINGUAGGIO BASIC - MANUALE GENERALE 



► 



GESTIONE DI UN FILE SU DISCO 



1 'utente vuole reoistra— 


deve sPDriPfirp 1p p^nrp^'iinm ron uns virnnlfl 


re dei valori numerici 


o un punto e virgola. 


(che possono essere cioè 




il risultato di una 


Se non vuole perdere spazio su disco deve 


espressione numerica o 


usare il punto e virgola anziché la virgola 


di relazione o logica) 






Per esempio: 




LIST 




10 OPEN "0", « 1 , "DATAI" 




20 A=l :B=2:C=3 




30 PR1NT«1,A;B;C 




40 CLOSE 1 




50 OPEN "1", «1 , "DATAI" 




60 INPUT #1,A1,B1, CI 




70 PR1NT Al ;B1 ;C1 




80 CLOSE •'< 1 




90 END 




Ok 




RUN 




1 2 3 




Ok 




30 PRINT#1,A,B,C 




RUN 




1 2 3 




Ok 




Se l'utente separa le variabili numeriche A,B 




e C nell'istruzione 30 con virgole anziché 




niint"! P \/irnnla il ri qii ! tatA t> ocaffamanto 
(j u 1 1 i_ i c v i i u i_> i a , il i laui lo IU C eoa L Laiiicn Le 




lo stesso, ma spreca spazio su disco dato che 




vengono inseriti spazi addizionali tra le 




variabi li 




Con il punto e virgola, la stringa su disco 




sarà: 




1 2 3 




con la virgola, sarà: 




1 2 3 
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l'utente vuole regi- 
strare valori stringa 



l'utente vuole regi- 
strare dei valori 
stringa che non con- 
tengono virgole, pun- 
ti e virgola, spazi 
iniziali e finali si- 
gnificativi, ritorno 
a capo o interlinee 



deve inserire, in modo esplicito, dei delimita- 
tori se vuole leggere quei valori come stringhe 
distinte (tramite la INPUT # ) 

deve usare una virgola, espressa come costante 
stringa (",") per separare le espressioni 
stringa nella PR1NT # . In questo modo anche i 
dati su disco verranno separati con una virgola 
e potranno quindi essere riletti come stringhe 
distinte tramite un'istruzione INPUT# 

Per esempio: 
LIST 

10 OPEN "0", # 1 , "DATAI " 
20 A$="CAMERA" 
30 B$="93605-2" 
40 PR1NT# 1 ,A$;B$ 
50 CL0SE#1 

60 OPEN "I", #1, "DATAI" 

70 INPUT #1, Al $ 

80 PR1NT Al $ 

90 CL0SE#1 

100 END 

Ok 

RUN 

CAMERA93605-2 
Ok 

40 PR1NT4 1,A$;",";B$ 
70 INPUT» 1,A1S,B1$ 
80 PR1NT A1$,B1$ 
RUN 

CAMERA 93605-2 
Ok 

Se l'utente separa A$ e B$ con un punto e 
virgola nell'istruzione 40, la stringa di 
caratteri registrata su disco sarà: 

CAMERA93605-2 

Poiché non ci sono dei delimitatori, questa 
stringa non può essere riletta come due stringhe 
distinte. Per poter fare ciò, bisogna inserire, 
in modo esplicito, un delimitatore (",") nell'i- 
struzione 40 e correggere in conseguenza anche 
le istruzioni 70 e 80. 

La stringa registrata su disco sarà allora: 
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GESTIONE DI UN FILE SU DISCO 



CAMERA, 93605-2 

Questa stringa verrà letta come due stringhe 
separate (vedi la seconda esecuzione del pro- 
gramma) 


l'utente vuole regi- 


deve separare le espressioni stringa con un 


strare dei valori 


carattere virgolette ("), espresso come funzione 


stringa che conten- 


CHRS(34) 


gono virgole , punti 


| ivi w ■ i y* * w • 


e virgola, spazi ini- 


ziali o finali si- 


i LIST 


gnificativi, ritorni 


10 OPEN "0", # 1 ."DATAI" 


a capo o interlinee 


20 A$="CAMERA, AUTOMATIC" 




30 B$=" 93605-2" 




40 PR1NT#1,A$;B$ 




50 CLOSEtfl 




60 OPEN 1, "DATAI" 




70 INPUT # 1 ,A$,B$ 




80 PR1NT A$;B$ 




90 CL0SE#1 




100 END 




Ok 




RUN 




CAMERAAUTOMATIC 93605-2 




Ok 




40 PR1NT ti 1 ,CHR$(34);A$;CHRS(34);CHR$(34): 




BS;CHR$(34) 




RUN 




CAMERA, AUTOMATIC 93605-2 




Ok 




L'istruzione 40 registra su disco la seguente 




stringa: 


1 


CAMERA, AUTOMATIC 93605-2 




e l'istruzione 70 assegna la stringa 




CAMERA 




alla variabile A$ e la stringa 




AUTOMATIC 93605-2 




alla variabile B$. Questo si può verificare tra- 




mite l'istruzione 80 quando si esegue il prò- ^ 
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gramma per la prima volta. Se l'utente modifica 
l'istruzione 40 come indicato, la stringa regi- 
strata su disco sarà: 



'CAMERA, AUTOMATIC"" 93605-2" 





e l'istruzione 70 assegnerà la stringa: 




"CAMERA, AUTOMATIC" 




alla variabile A$ e la stringa: 




93605-2" 




alla variabile B$. Questo si può verificare con 
l'istruzione 80, quando si esegue il programma 
per la seconda volta. 



PR1NT# US1NG (PROGRAMMA/ IMMEDIATO) 




Registra dati su un file sequenziale, usando un formato definito 
dall'utente allo stesso modo di un'istruzione PRINT US1NG che però visua- 
lizza l'output sul video. 
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Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 


file number 


è un'espressione numerica il cui valore arroton- 
dato specifica il numero del buffer associato al 
file 


string expression 


è la formattazione dei caratteri descritta 
dettagliatamente nel capitolo 7 


expression 


può essere un'espressione numerica, di relazio- 
ne, logica o stringa, il cui valore viene regi- 
strato sul file 



Note 

L'utente deve aver cura di registrare i dati con gli opportuni delimita- 
tori in modo di poterli poi rileggere in modo corretto con un'istruzione 
INPUT». 

Per esempio, l'istruzione: 
PR1NT# 1,USING"####,##,";A,B,C.D 

può essere usata per registrare dati numerici senza delimitatori espli- 
citi. La virgola al termine della stringa di formato serve a separare i 
dati sul file. 

Si veda il capitolo 7 per maggiori dettagli sulle prestazioni offerte 
dall'istruzione PR1NT USING 



URITE* (PROGRAMMA/ IMMEDIATO) 



Registra dati su un file sequenziale, usando lo stesso formato utilizzato 
dall'istruzione WR1TE sul video. Ogni dato viene separato dal precedente 
tramite una virgola. Le stringhe vengono delimitate dal carattere virgo- 
lette ("). Dopo la registrazione dell'ultimo dato della lista, il BASIC 
introduce un ritorno a capo/interlinea. 
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Figura 12-5 Istruzione WR1TE» 



Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


file number 


è un'espressione numerica il cui valore arroton- 
dato specifica il numero del buffer associato al 
file 


expression 


può essere un'espressione numerica, di relazio- 
ne, logica o stringa, il cui valore viene 
registrato sul file 



Note 

Non è necessario inserire dei delimitatori espliciti nella lista di 
un'istruzione URITE". 

Se l'utente vuole registrare una stringa che contiene il carattere vir- 
golette ("), deve usare l'istruzione PR1NT invece dell'istruzione 
URITE # . 

11 carattere virgolette (") può essere inserito all'interno di un valore 
stringa tramite la funzione CHRS(34), purché il valore stringa non 
contenga virgole, punti e virgola, spazi iniziali e finali significativi, 
ritorni a capo e interlinee. 

Un carattere virgolette (") può anche appartenere al valore stringa 
memorizzato in una variabile stringa, se detto valore viene assegnato 
tramite istruzioni READ e DATA o istruzioni INPUT (LINE INPUT, INPUT.-; , o 
LINE INPUT " ). 
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GESTIONE DI UN FILE SU DISCO 



Esempio 



■ — — 1 

VIDEO 


COMMENTI 


LIST 


L'istruzione 40 registra la seguente stringa su 


10 OPEN "0",1 ,"DATA2" 


disco: 


20 A$="CAMERA" 




30 B$="93605-2" 


"CAMERA", "93605-2" 


40 WR1TE#1 ,AS,BS 




50 CLOSE#1 


L'istruzione 70 assegna "CAMERA" alla variabile 


60 OPEN ,"DATA2" 


A$ e "93605-2" alla variabile B$. Questo si può 


70 1NPUT#1,A$,B$ 


verificare con l'istruzione 80 


80 URITE AS.BS 




90 CLOSE #1 




100 END 




OK 




RUN 




"CAMERA" , "93605-2" 




OK 





LOC (PROGRAMMA/IMMEDIATO) | 



Nel caso di file sequenziale, LOC ritorna il numero di settori (blocchi 
di 256 byte) letti da/registrati su file da quando è stato aperto. La 
funzione LOC può anche essere usata con file ad accesso diretto (vedi 
seguito) . 




Figura 12-6 Funzione LOC 
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Dove 

ELEMENTO DI SINTASSI 



SIGNIFICATO 



file number è un'espressione numerica arrotondata all'intero 

più vicino. Si tratta del numero del buffer 
associato al file 



Esempio 

200 1F LOC(2)>30 THEN STOP 



LETTURA DI UN FILE SEQUENZIAL E 

Per leggere un file sequenziale l'utente deve aprirlo in Input ("I"). 

Le istruzioni INPUT # e LINE INPUT # consentono di leggere dati da un 
file sequenziale. 

INPUT* legge uno o più dati, separati da delimitatori, e li assegna ad 
una lista di variabili numeriche e/o stringa. L'istruzione LINE 1NPUT# 
legge un'intera linea (fino al carattere ritorno a capo) e la assegna ad 
una variabile stringa. 

Oltre alle due istruzioni qui indicate, il BASIC consente di utilizzare 
due funzioni molto utili per il trattamento dei file sequenziali: 

- la funzione EOF: consente di verificare se è stata raggiunta la fine di 
un file e di evitare quindi una ulteriore lettura che darebbe luogo al 
messaggio d'errore: 

Input past end. 

- la funzione LOC : permette di conoscere il numero di settori (blocchi 
di 256 byte) che sono stati letti dal file, o scritti sul file, da 
quando è stato aperto. 

Per leggere i dati da un file sequenziale, sono richiesti i seguenti 
passi di programma: 
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GESTIONE DI UN FILE SU DISCO 



PASSO 


AZIONE 


ESEMPI 


1 


L'utente deve aprire 


10 OPEN "I", # 2, "DATA" 




il file, specificando 






"I" come metodo 






d 'accesso. 




2 


L'utente può quindi leggere 
una serie di valori nume- 
rici e/o stringa dal file, 
utilizzando le istruzioni 


50 INPUT* 2,X$,Y$,Z 



INPUT* e/o LINE INPUT* 



L'utente può continuare 
a leggere i dati, cioè 
ripetere il passo 2 per 
un numero arbitrario di 

volte (fino a raggiungere 100 INPUT* 2,X1 ,X2,X3,X4 

la fine del file) 







150 INPUT* 2,US,U$ 


4 


Quando ha finito di leggere 
i suoi dati, l'utente chiu- 
derà il file (a meno che 
non voglia concatenare un 
altro programma che debba 
leggere dati dal file). 


200 CL0SE#2 
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INPUT* ( PROGRAMMA/ IMMEDIATO ) 




Legge i dati da un file sequenziale e li assegna a variabili di program- 
ma. 




Figura 12-7 


Istruzione 


INPUT* 






Dove 










ELEMENTO DI 


SINTASSI 




SIGNIFI' 


:ato 


file number 




è un 
dato 
file 


espressione numerica il 
specifica il numero del 


cui valore arroton- 
buffer associato al 


variable 




è il 
dato 


nome della variabile eh- dovrà contenere un 
letto dal file 



Note 

A differenza dell'istruzione INPUT, l'istruzione INPUT* non visualizza 
alcun messaggio quando viene eseguita. 
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Caratteristiche 



SE... 



viene eseguita un'istru- 
zione INPUT* 



ALLORA. . . 



i dati vengono letti dal file in sequenza, 
cioè, quando il file viene aperto, il 
"pointer" del file viene posto all'inizio del 
file. 

Ogni volta che un dato viene introdotto, il 
"pointer" si sposta all'inizio del dato 
successivo. 

Se l'utente vuole rileggere il file dall'ini- 
zio, deve chiudere il file ed aprirlo di 
nuovo. 



l'utente vuole leggere 
dati senza generare 
errori 



il BASIC sta per assegna- 
re un dato a una variabi- 
le numerica 



deve conoscere il tipo (numerico o stringa) 
di ogni dato sul file. 1 dati sul file 
dovranno essere separati da opportuni delimi- 
tatori (vedi seguito). 

Dati numerici possono essere introdotti in 
variabili stringa. 

Se l'utente introduce un numero in una 
stringa e ne vuole poi il suo valore numerico 
effettivo, dovrà usare la funzione VAL ad 
evitare errori di incompatibilità di tipo. 



ignora eventuali spazi iniziali, caratteri di 

ritorno a capo e interlinea. 

Quando viene incontrato il primo carattere 

diverso dai precedenti, il BASIC assume di 

aver incontrato il primo carattere di un 

numero. 

11 numero termina quando viene incontrato uno 
spazio, oppure un ritorno a capo o una 
interlinea o una virgola. 



N.B. Nelle assegnazioni numeriche possono 
verificarsi delle conversioni se la 
variabile è di tipo diverso dalla 
costante (così come può succedere con le 
istruzioni LET o INPUT o READ nel 
capitolo 5). 
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il BASIC sta per assegna- 
re un dato a una varia- 
bile stringa 



ignora eventuali spazi iniziali, caratteri di 

ritorno a capo e interlinea. 

Quando viene incontrato il primo carattere 

diverso dai precedenti, il BASIC assume di 

aver incontrato il primo carattere di una 

stringa. 



questo primo carattere 
è il carattere virgo- 
lette (") 



questo primo carattere 
non è il carattere 
virgolette (") 



la stringa consiste di tutti i caratteri 
letti fino al successivo carattere virgolet- 
te. 

I caratteri virgolette non fanno parte della 
stringa (ciò significa che una stringa 
inclusa tra virgolette su disco, non può 
comprendere il carattere virgolette) 

la stringa non è compresa tra virgolette e 
termina quando viene incontrata una virgola, 
oppure un ritorno a capo o una interlinea (o 
dopo che sono stati letti 255 caratteri). 
Per esempio, se sul disco sono presenti i 
seguenti dati: 



SUBR0UT1NES, SOTTOPROGRAMMI "COME RICHIAMAR- 
LI?" 



1 'istruzione: 



INPUT * 1 ,R$,S$,TS 

assegnerà i valori come segue: 

R$ = SUBR0UT1NES 

SS = SOTTOPROGRAMMI "COME RICHIAMARLI ?" 
T$ = stringa nulla 

Se invece sul disco fossero presenti i 
seguenti dati: 

SUBR0UT1NES, SOTTOPROGRAMMI, "COME RICHIAMAR- 
LI?" 

la stessa istruzione assegnerà i seguenti 
valori : 



RS = SUBR0UT1NES 
SS = SOTTOPROGRAMMI 
TS = COME RICHIAMARLI? 
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LINGUAGGIO BASIC - MANUALE GENERALE 



GESTIONE DI UN FILE SU DISCO 



LINE INPUT#(PROGRAMMA/ IMMEDIATO) 



Legge un'intera linea (fino al carattere di ritorno a capo) da un file 
sequenziale e la assegna ad una variabile stringa 




Figura 12-8 Istruzione LINE INPUT*' 



Oove 



ELEMENTO DI SINTASSI 



file number 



string variable 



SIGNIFICATO 



è un'espressione numerica il cui valore intro- 
dotto specifica il numero del buffer associato 
con il file 



è il nome della variabile a cui sarà assegnata 
la linea 



Caratteristiche 



SE... 




ALLORA. . . 


viene eseguita un'i- 




viene letta una linea di dati che viene 


struzione LINE 1NPUT# 




assegnata alla variabile stringa specificata 






LINE INPUT # legge tutti i caratteri del file 






fino a incontrare: 






- un carattere di ritorno a capo, o 






- un carattere di ritorno a capo/interlinea, ò 






- la fine del file, o 



► 
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- il 255 m ° carattere (questo 255™° carattere è 
compreso nella stringa) 


vengono incontrati 
caratteri iniziali o 
altri delimitatori - 
virgolette, virgole, 
spazi, e così via 


tutti questi caratteri iniziali o tutti questi 
delimitatori vengono inclusi nella stringa 


si vuole leggere dati 
senza seguire le nor- 
mali restrizioni ri- 
guardanti i caratte- 
ri iniziali e termina- 
li 


l'utente deve usare istruzioni LINE INPUT* 


si vuole leggere come 
un file dati un 
programma BASIC in 
formato ASCII 


l'utente deve usare istruzioni LINE 1NPUT# (è 
possibile registrare programmi che correggono 
altri programmi ASCII; rinunerarli, cambiare 
l'istruzione LPR1NT in PRINT, etc.) 



Note 

LINE INPUT* legge tutti i caratteri nel file fino al carattere di 
ritorno a capo. Essa quindi salta la sequenza ritorno a capo/interlinea e 
la successiva LINE INPUT* legge tutti i caratteri fino al prossimo 
ritorno a capo (se viene incontrata la sequenza interlinea/ritorno a 
capo, essa viene considerata come facente parte della variabile stringa) 



Esempio 



VIDEO 


COMMENTI 


LIST 


Questo programma conta 


10 INPUT "PROGRAM 1DENT1FIER";P$ 


il numero delle linee 


20 OPEN "1",1 ,P$ 


in un file programma in 


30 KV=0 


formato ASCII. 


40 1F E0F(1) THEN 80 




50 K».=K*.+1 




60 LINE INPUT* 1,A$ 




70 GOTO 40 
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GESTIONE DI UN FILE SU DISCO 



80 PR1NT P$ " 1S" K% "LINES LONG" 

90 CLOSE 

100 GOTO 10 

110 END 

Ok 

RUN 

PROGRAM IDENT1FIER? V1:P1 
V1:P1 IS 350 LINES LONG 
PROGRAM IDENTIFIER? V1:P2 
V1 :P2 IS 1520 LINES LONG 
PROGRAM IDENTIFIER? AC 
Break in 10 
Ok 



Ogni linea termina con 
un ritorno a capo/in- 
terlinea, così la LINE 
INPUT" all'istruzione 
60 legge un'intera 
linea alla volta nella 
variabile fittizia A$. 
La variabile intera K% 
conta le linee del 
programma . 



EOF (PROGRAMMA) | 



Ritorna -1 (cioè vero) se è stata raggiunta la fine di un file sequen- 
ziale. 

E' opportuno usare EOF per verificare la fine del file mentre lo si 
legge, per evitare errori di "Input past end" 



Figura 12-9 Funzione EOF 



Dove 



ELEMENTO DI SINTASSI SIGNIFICATO 



file number è un'espressione numerica arrotondata all'intero 

più vicino. Si trotta del numero del buffer 
associato al file 



12-27 



Esempio 




10 01M A(50) 

20 OPEN "1" , 1 , "DATAI " 

30 FOR K%=0 TO 50 

40 IF EOF(l) THEN 100 

50 INPUT # 1,A(K%) 

60 NEXT K% 



AGGIORNAMENTO DI UN FILE SEQUENZIALE 

Per aggiornare un file sequenziale, l'utente deve leggere l'intero file e 
quindi registrare i dati aggiornati su un nuovo file di output, come 
indicato nella tabella che segue: 



PASSO AZIONE 



1 L'utente deve aprire il file sequenziale da aggiornare 



2 L'utente deve aprire un nuovo file sequenziale 

3 L'utente deve leggere una lista di dati e aggiornarli come 
richiesto 

4 L'utente deve registrare i dati aggiornati sul nuovo file 

5 L'utente deve ripetere i passi 3 e 4 fino a quando tutti i dati 
sono stati letti, aggiornati e registrati sul nuovo file; quindi 
andare al passo 6 



L'utente deve chiudere entrambi i file (a meno che non debbano 
essere riutilizzati con lo stesso metodo d'accesso da un altro 
programma concatenato) 
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GESTIONE DI UN FILE SU DISCO 



DEFINIZIONE DEL FORMATO DI UN RECORD 

Dopo l'apertura di un file ad accesso diretto l'utente deve definire il 
formato del record tramite un'istruzione FIELD. L'istruzione FIELD 
organizza il buffer del file ad accesso diretto in modo che diventa 
possibile passare dati da programma a disco e viceversa. 

11 record può essere suddiviso in più campi tramite un'istruzione FIELD, 
ma il numero totale di byte allocati in un'istruzione FIELD non deve 
superare la lunghezza del record determinata al momento dell'apertura del 
file. Diversamente si verifica un errore pe-- "Field overflow". (La 
lunghezza di default del record è 256 byte). 

L'istruzione FIELD stabilisce la dimensione di ciascuno di questi campi e 
consente ai nomi delle variabili stringa di puntare a ciascun campo. 1 
nomi di questi campi, diversamente dalle stringhe ordinarie che puntano 
ad un'area in memoria chiamata "spazio stringa", puntano all'area del 
buffer associato al file. 

Tutti i dati, stringa e numeri, devono essere posti nel buffer in formato 
stringa. Esistono tre paia di funzioni (MK1S/CV1 ,MKS$/CVS,MKD$/CVD) per 
convertire i numeri in stringa e viceversa. 

Nota : Non è possibile utilizzare il nome di un campo in un'istruzione 
INPUT, o sul lato sinistro di un'istruzione LET. Quel nome non punterebbe 
più al campo nel buffer, ma allo spazio stringa; quindi non sarebbe pos- 
sibile per l'utente accedere a quel campo utilizzando il nome prece- 
dentemente assegnatogli. 



FIELD (PROGRAMMA/IMMEDIATO) 



Definisce i campi nel buffer di un file ad accesso diretto 




Figura 12-10 Istruzione FIELD 
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Dove 



ELEMENTO DI SINTASSI 




SIGNIFICATO 


file number 




è un'espressione numerica il cui valore arroton- 
dato specifica il numero del buffer associato al 
file 


field width 




è il numero di byte da allocare nel campo. 
Un byte corrisponde ad un carattere 


field name 




è il nome stringa da assegnare al campo definito 
da "field width" 



Esempi 



VIDEO 



20 FIELD# 1 ,15 AS NAMES.20 AS C$, 
10 AS PS 



80 NAME$=B$ (Errato) 
100 LSET NAME$=B$ (Corretto) 



COMMENTI 



L'istruzione 20 alloca le prime 15 
posizioni (byte) del buffer» 1 al 
campo di nome NAMES, le successive 
20 al campo di nome C$ e le ultime 
10 al campo di nome P$ 

Dopo l'esecuzione dell'istruzione 
80, NAME$ diventa un nome ordinario 
di una variabile stringa. L'utente 
non ha più la possibilità di acce- 
dere al primo campo del buffer. 



L'utente deve invece usare l'istru- 
zione 100 ( si vedano di seguito le 
istruzioni LSET/RSET) 

► 
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30 FIELD« 2,128 AS Nl$,128 AS N2$ 



100 FIELD" 2,128 AS N3S.100 AS N4$, 
28 AS N5S 



50 FIELD» 3,16 AS K$(1),112 AS L$(1) 



90 FIELD" 3,128 AS DUMMY$, 
16 AS K$(2),112 AS L$(2) 



L'utente può usare FIELD tante 
volte quante vuole per "riorganiz- 
zare" il buffer di un file 

La riorganizzazione di un buffer 
mediante l'istruzione FIELD non 
cancella i contenuti del buffer; 
viene cambiato soltanto il modo di 
accedere al buffer (tramite i nomi 
dei campi). Così due o più nomi di 
campi possono fare riferimento alla 
stessa area del buffer. 

In un'istruzione FIELD l'utente può 
utilizzare una variabile fittizia 
per "saltare" una parte del buffer 
e iniziare la strutturazione del 
buffer da quel punto 

Nella seconda istruzione FIELD, 
DUMMY$ serve a spostare la posizio- 
ne d'inizio di K$(2) alla posizione 
129 del buffer 



Nota 

E' buona norma che la somma di tutte le dimensioni dei campi sia uguale 
alla lunghezza del record stabilita dall'istruzione OPEN. In ogni caso 
questa somma non deve superare la lunghezza del record, diversamente si 
verifica un errore per "Field overflow". 



REGISTRAZIONE DI RECORD SU UN FILE AD ACCESSO DIRETTO 

Per registrare record su un file ad accesso diretto, l'utente deve aprire 
il file, specificando "R" come metodo d'accesso. 

L'istruzione PUT-File consente poi la registrazione dei record. Il 
contenuto del record deve essere stato preparato nell'ambito del buffer 
ad accesso diretto prima dell'esecuzione dell'istruzione PUT-File, 
tramite le istruzioni LSET o RSET. Le istruzioni LSET e RSET muovono i 
dati dalla memoria al buffer del file ad accesso diretto allocando le 
espressioni stringa nei campi predefiniti. 
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Se l'espressione stringa utilizza meno byte di quelli che l'utente ha al- 
locato nell'istruzione F1ELD, lo spazio allocato in più viene riempito 
con caratteri blank che possono essere posizionati a sinistra o a destra 
del valore dell'espressione stringa. L'allineamento a sinistra (v. istru- 
zione LSET) inizia nella prima posizione del campo. L'allineamento a 
destra (v. istruzione RSET) termina nell'ultima posizione del campo. 
Quando l'utente deve trasferire valori numerici nel buffer, deve conver- 
tirli in stringa tramite le funzioni MKI$, MKSS e MKDS. 

Nota : La funzione LOC ritorna il numero del record appena scritto tr amite 
una PUT-File o letto tramite una GET-File. 

Per registrare record su un file ad accesso diretto, sono richiesti i 
seguenti passi di programma: 



PASSO 


AZIONE 


ESEMPI 


1 


L'utente deve aprire 
il file, specificando 
i "R" come metodo d'ac- 
cesso e (opzionalmen- 
te) la lunghezza del 
record 


10 OPEN "R",# V'UDIR", 22 


2 


L'utente deve strut- 
turare il buffer tra- 
mite una F1ELD # 


20 F1ELD# 1,15 AS A$,5 AS B$, 
2 AS C$ 


3 


L'utente può quindi 
inserire i dati nel 
buffer 


100 LSET A$="J0HN JONES" 
110 LSET B$="U.K." 
120 LSET C$=MK1$(1%) 


4 


L'utente può registrare un 
record (il quinto) sul file 


130 PUT" 1,5 


5 


— — ; -4 

L'utente può registrare 
un altro record ripar- 
tendo dal passo 3. Diver- 
samente deve andare al 
passo 6 





► 
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GESTIONE DI UN FILE SU DISCO 



Quando ha finito di re- 
gistrare i suoi dati l'u- 
tente chiuderà il file 
(a meno che voglia conca- 
tenare un altro program- 
ma che debba utilizzare 
lo stesso file con lo 
stesso metodo d'accesso) 



150 CL0SE# 1 




LSET/RSET (PROGRAMMA/IMMEDIATO) 



LSET memorizza un valore stringa allineato a sinistra in un campo del 
buffer ad accesso diretto, o allinea a sinistra un valore stringa in una 
variabile stringa. 

RSET memorizza un valore stringa allineato a destra in un campo del 
buffer ad accesso diretto o allinea a destra un valore stringa in una 
variabile stringa. 
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Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


f i p 1 d nflfiip 


p i in a WAn Ahi 1 p etri nna rha cnori f i("a il n/*ima H"i 
c una voi iqj i ic sii iiiua t,n c spctl i ita il nume u i 

un campo di un buffer ad accesso diretto 


strina variable 


e il nomp di un^i vati rìhi 1 p strinofl nrriinflrìfl 

c ii ii in mg u i uiia vai lau i ic ìu iiiua ui uinai io 


MK1S/MKSS/MKDS 


sono le funzioni che convertono un intero 
(MK1S), o un valore in singola precisione 
(MKSS), o in doppia precisione (MKDS), in valore 
stringa 


string expression 


è la stringa da allineare a sinistra o a destra 
in un dato campo 


numeric expression 


è il valore numerico da convertire in stringa e 
allineare a sinistra o a destra in un dato campo 



Esempi 



VIDEO 



COMMENTI 



10 OPEN "R", # 1 , "1 :MYF1LE/MYPASS",20 
20 F1ELD #1,10 AS NI $ , 1 0 AS N2$ 
30 LSET N1$="CHARLES" 
40 LSET N2$="JAMES" 



100 RSET N1$="CHARLES" 
110 RSET N2$="JAMES" 



200 LSET N1$="CHARLES THOMSON" 



Le istruzioni 30 e 40 assegnano i 
dati sul buffer #1 come segue: 

N1$ 



CHARLES 



N2$ 



JAMES 



Le istruzioni 100 e 110 assegnano 
i dati nel buffer come segue: 
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110 A$=SPACE$(20) 
120 RSET A$=N$ 



N1S 



CHARLES 



N2$ 



JAMES 



L'istruzione 200 assegna i dati 
nel buffer come segue: 

N1$ 



CHARLES TH 



Nota : Se una stringa è troppo 
lunga e quindi non può essere 
contenuta nel campo del buffer 
specificato, viene troncata sulla 
destra, indipendentemente dal 
fatto che sia stata usata l'i- 
struzione LSET o RSET. 



Le istruzioni LSET e RSET possono 
anche essere utilizzate con una 
variabile non associata all'i- 
struzione F1EL0 per l'allinea- 
mento a destra o a sinistra di 
una stringa in un dato campo. 
Questa può essere una utile tec- 
nica di formattazione per le 
operazioni di stampa. 

Nell'esempio a sinistra l'istru- 
zione RSET allinea a destra la 
stringa N$ in un campo di 20 
caratteri 
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MK1S/MK5S/MKD$ (PROGRAMMA/IMMEDIATO) 



Queste funzioni cambiano un numero in una stringa. 

La funzione MKI$ converte un intero in una stringa di 2 caratteri 

La funzione MKSS converte un valore in singola precisione in una stringa 
di 4 caratteri 

La funzione MKDS converte un valore in doppia precisione in una stringa 
di 8 caratteri 



figura 12-12 Funzione MK1$ 




Figura 12-13 Funzione MKSS 





Figura 12-14 Funzione MKD$ 
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Esempi 



VIDEO 

30 LSET D$=MKI$(tt) 



100 STR4C$=MKS$(SPV) 



COMMENTI 

Il campo D$ deve ora contenere una 
rappresentazione di due byte del- 
l'intero 1% 



Una funzione "make" (MKIS, MK5S, 
MKD$) viene utilizzata con le 
istruzioni LSET e RSET dato che 
queste funzioni utilizzano come 
argomenti delle stringhe. In questo 
caso SPV è il nome di una variabile 
in singola precisione che viene 
convertita in una stringa di 4 
caratteri e assegnata alla varia- 
bile stringa 5TR4C$. 



PUT-File (PROGRAMMA/IMMEDIATO 



Registra su un file ad accesso diretto i dati prelevati dal buffer e 
associato al file. 




Figura 12-15 Istruzione 


PUT-File 




Dove 






ELEMENTO DI SINTASSI 


SIGNIFICATO 


file number 


è un'espressione 


numerica che specifica il 




numero del buffer 


associato al file 





► 
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record number 



è un'espressione numerica che specifica il 
numero del record nel file. Il numero minimo di 
record è 1, il numero massimo è 32767. In caso 
di omissione di questo parametro viene registra- 
to il record corrente. 

Nota : Il record corrente è il record il cui 
numero è più alto di uno rispetto a quello 
dell'ultimo record selezionato. La prima volta 
che l'utente accede a un file ad accesso di- 
retto, il numero del record corrente è definito 
uguale a 1 . 



Esempi 



VIDEO 


COMMENTI 


LIST 


L'istruzione 10 apre il 


10 OPEN "r",1,"1:RAN0",48 


file ad accesso diretto 


20 FIELD 1,20 A3 RI $ , 20 AS R2$,8 AS R3$ 


RAND, con una lunghezza 


30 FOR L=1 TO 4 


di record di 48 byte, 


40 INPUT "name";N$ 


sul disco inserito nel- 


50 INPUT "address";M$ 


1 l'unità 1. 11 numero 


60 INPUT "phone";P# 


; del file è 1 . L'istru- 


70 LSET R1$=N$ 


zione 20 divide il 


80 LSET R2$=M$ 


buffer in campi. 


90 LSET R3S=MKSS(P#) 




100 PUT 1 ,L 


L'istruzione 100 regi- 


110 NEXT L 


stra un record nel file 


120 CLOSE 1 


RAND, con il numero di 


130 END 


record definibile tra- 


Ok 


mite la variabile di 


RUN 


controllo del ciclo 


name; super man 


iterativo FOR/NEXT 


address? USA 




phone? 11234621 




name? robin hood 




address? England 




phone? 23462101 




Ok 
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LOC (PROGRAMMA/IMMEDIATO) I 



Nel caso di file ad accesso diretto, la funzione LOC fornisce il numero 
del record appena letto tramite un'istruzione GET#, o ritorna il numero 
del record appena registrato tramite un'istruzione PUT # . 




Figura 12-16 Funzione LOC 



Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


file number 


è un'espressione numerica arrotondata all'intero 
più vicino. E" il numero del buffer associato al 
file 


Esempi 


VIDEO 


COMMENTI 


10 OPEN "R",2,"TOUNS",80 

20 F1ELD 2,20 AS F1S.20 AS F2S, 

20 AS F3S, 20 AS F4$ 
30 Y=1 


In questo caso F1$ è il nome di un 
campo. Se il valore di FI $ è lo stesso 
di A$, viene visualizzato il numero 
del record nel quale è stato trovato. 



100 A$="M1LAN 
110 GET 2,Y 
120 Y=Y+1 

130 1F FI S=A$ THEN PR1NT 

"FOUND IN RECORD";L0C(2): 
CLOSE : END 

140 GOTO 110 
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Nota 



Se il file è stato aperto, ma non è stata ancora eseguita alcuna 
operazione di 1/0, LOC ritorna il valore 0. 



LETTURA DI RECORD DA UN FILE AD ACCESSO DIRETTO 

Per leggere record da un file ad accesso diretto, l'utente deve aprire il 
file, specificando "R" come metodo d'accesso. L'istruzione GET-File 
consente la lettura dei record. 

GET-File specifica sia il numero del file sia il numero del record da 
leggere. Con l'esecuzione di una GET-File, i contenuti del record 
specificato vengono trasferiti nel buffer del file. 

Per accedere ad un singolo dato memorizzato nel buffer (tramite il nome 
del campo) l'utente può usare: 

- un'istruzione LET (se vuole assegnarlo a una variabile programma), o 

- un'istruzione PR1NT, PR1NT US1NG, LPR1NT, o LPRINT USING (se vuole 
visualizzarlo o stamparlo). 

Nota : Se l'utente vuole assegnare, visualizzare o stampare il nome di un 
campo da convertire in un numero deve effettuare la conversione usando la 
funzione CVI, o CVS o CVO. 

Nota : La funzione LOC ritorna il numero del record appena letto tramite 
una GET-File o scritto tramite una PUT-File. 

Per leggere i dati da un file ad accesso diretto, sono richiesti i 
seguenti passi di programma: 



PASSO 


AZIONE 


ESEMPI 


1 


L'utente deve aprire il file 
specificando "R" come metodo 
d'accesso e (opzionalmente) 
la lunghezza del record 


10 OPEN "R' 


,#2,"1:D1R" 


,22 


2 


L'utente deve strutturare 
il buffer tramite la F1ELD 


20 F1ELD42 
AS CS 


15 AS AS,5 


AS B$,2 
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3 


1 ... 1 
L'utente può quindi leggere 

un record dal file (A in- 
dica il numero del record) 


100 GET#2,A 


4 


L'utente può estrarre i 
dati dal buffer o con l'i- 
struzione LET o con l'istru- 
zione PR1NT (PR1NT US1NG) . 
1 valori numerici (memo- 
rizzati in formato stringa 
all'interno del buffer) 
devono essere convertiti 
in numeri usando le fun- 
zioni di "conversione": 
CVI, CVS e CVD 


100 A1S=AS 
120 PR1NT BS 
130 1%=CV1(CS) 


5 


L'utente può continuare 
a leggere un altro re- 
cord ripartendo dal passo 
3. Diversamente, deve 
andare al passo 6 




6 


Quando ha finito di 
leggere i suoi dati l'u- 
tente chiuderà il file 
(a meno che voglia con- 
catenare un altro pro- 
gramma che debba leggere 
dati dallo stesso file 
con lo stesso metodo 
d'accesso) 


500 CL0SE#2 



Nota : In un programma che esegue sia operazioni di input che di output 
sullo stesso file ad accesso diretto, l'utente spesso può utilizzare una 
sola istruzione OPEN e una sola istruzione FIELD. 
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GET-File (PROGRAMMA/IMMEDIATO) 



Legge un record da un file ad accesso diretto. 




GET 



file 

number 




record 
number 



Figura 12-17 Istruzione GET-File 



Dove 



ELEMENTO DI SINTASSI 



file number 



record number 



SIGNIFICATO 



è un'espressione numerica il cui valore arroton- 
dato specifica il numero del buffer associato al 
file 

è un'espressione numerica il cui valore arroton- 
dato specifica il numero del record da leggere 
(cioè da trasferire nel buffer). Se omesso, vie- 
ne letto il record corrente. 



11 numero minimo di record Si, il numero mas- 
simo è 32767. 

Nota : 11 record corrente è il record il cui 
numero supera di uno quello dell'iltimo record 
selezionato. 

La prima volta che l'utente accede ad un file ad 
accesso diretto (senza specificarne il numero 
nel record) il numero del record corrente è 
definito uguale a 1 . 



12-42 



LINGUAGGIO BASIC - MANUALE GENERALE 



GESTIONE DI UN FILE SU DISCO 



Esempi 



VIDEO 


COMMENTI 


LIST 




Questo programma ricer- 


10 OPEN "r" , 1 , "1 : RAND" ,48 




ca le informazioni me- 


20 FIELD 1,20 AS RI $.20 AS R2.8 AS R3$ 


morizzate nel file spe- 


30 FOR L=1 TO 4 




cificato. 1 dati letti 


40 GET 1,L 




nel buffer sono acces- 


50 PR1NT R1$,R2$,CVD(R3$) 




sibili da programma. 


60 NEXT 




Ciò avviene in questo 


70 CLOSE 




caso tramite l'istru- 


80 END 




zione PR1NT (si veda 


Ok 




l'istruzione 50. 


RUN 






Super man USA 


11234621 


Si suppone che i dati 


robin hood England 


23462101 


siano stati registrati 






in precedenza sul file 






tramite l'istruzione 


Ok 




j PUT-File. 



CV1/CVS/CVD (PROGRAMMA/ IMMEDIATO ) 



Convertono valori stringa in "valori numerici 

CV1 converte una stringa di 2 caratteri in un intero. 

CVS converte una stringa di 4 caratteri in un numero in singola precisio- 
ne. 



CVD converte una stringa di 8 caratteri in un numero in doppia 
precisione. 




Figura 12-18 Funzione CV1 
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<ED— ©i 



4 byte 




string 







4 byle 
fiele! name 



Figura 12-19 Funzione CVS 



8 byte 
field name 



Figura 12-20 Funzione CVD 
Esempi 



10 X#=CVD(N$) 
20 Y!=CVS(R1$) 



AGGIORNAMENTO DI RECORD DI UN FILE AD ACCESSO DIRETTO 



Per aggiornare un file ad accesso diretto, l'utente deve leggere ogni 
record da aggiornare e quindi registrarlo, come indicato nella tabella 
che segue. 



PASSO 


AZIONE 


1 


L'utente deve 


aprire il file 


ad accesso diretto 


2 


L'utente deve 


strutturare il 


buffer in campi 
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GESTIONE DI UN FILE SU DISCO 



L'utente deve leggere il record da aggiornare 



L'utente deve estrarre i dati dal buffer per visualizzarli o 
assegnarli a variabili di programma 



L'utente deve inserire i nuovi valori nei campi del buffer 
L'utente deve registrare il record aggiornato 



L'utente può aggiornare un altro record, ripartendo dal passo 3. 
Diversamente, deve andare al passo 8 



L'utente deve chiudere il file (a meno che non iebba essere 
riutilizzato con lo stesso metodo d'accesso da un altro 
programma concatenato) 



Esempio 



VIDEO 


COMMENTI 


LIST 




L'istruzione 10 apre un file ad 


10 OPEN "r",1,"1:filetext",!28 


accesso diretto, chiamato filetext 


20 FIELD 1,128 AS A$ 




e residente sul dischetto inserito 


30 INPUT "record number 


';RNUM 


nell 'unità 1 


40 6ET 1.RNUM 






50 PRINT A$ 




L'istruzione 20, in questo caso, 


60 INPUT "give me data " 


;PP$ 


specifica soltanto un nome di campo 


70 LSET A$="new data 


+PPS 




80 PUT 1.RNUM 




L'istruzione 40 legge il record da 


90 INPUT "CONTINUE (y/n) 


";RS 


aggiornare, il cui numero è intro- 


100 IF R$="y" THEN 30 




dotto da tastiera tramite l'istru- 


110 CLOSE 




zione 30 


Ok 






RUN 




L'istruzione 50 visualizza i dati 


record number ? 1 




provenienti dal buffer 


new datapoloo 






give me data ? gio 




L'istruzione 70 inserisce i nuovi 


CONTINUE (y/n) ? y 




valori nel campo del buffer, con- 


record number ? 1 




catenando (+) la variabile stringa 


new data — gio 




PP$ alla costante stringa "new data 


give me data ? poi 






CONTÌNUE (y/n) ? n 






Ok 
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L'istruzione 80 registra il record 
aggiornato 

Le istruzioni 90 e 100 consentono 
all'utente di continuare o di 
fermarsi 



L'istruzione 110 chiude il file. 
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13. DEBUGGING E RECUPERO DEGLI ERRORI 



SOMMARIO 

Questo capitolo descrive le istruzioni ed alcune delle tecniche, che 
vengono utilizzate per diagnosticare e correggere gli errori di un 
programma. 



INDICE 

TIPI DI ERRORE 13-1 

VISUALIZZAZIONE DEI NUMERI 13-2 
DI LINEA ESEGUITI (TRAC1NG) 

TRON/TROFF (PROGRAMMA/ 13-2 
IMMEDIATO) 

INTERRUZIONE DELL'ESE- 13-3 
CUZ10NE DI UN PROGRAMMA 

END (PROGRAMMA) 13-4 

STOP (PROGRAMMA) 13-4 

CONT (IMMEDIATO) 13-5 

CONTROLLO E RECUPERO 13-7 
DEGLI ERRORI 

ZRROR ( PROGRAMMA/ IM- 13-8 
MEDIATO! 

ON ERROR GOTO (PROGRAMMA) 13-10 

ERL/ERR ( PROGRAMMA/ IMME- 13-12 

DIATO) ^ 

RESUMÉ (PROGRAMMA) 13-14 



13-ii 



DEBUGGING E RECUPERO DEGLI ERRORI 



TIPI DI ERRORE 

Succede raramente che un programmatore, per quanto esperto sia, scriva 
al primo tentativo un programma privo di errori. Se si escludono gli 
errori relativi all'impostazione di una linea (già descritti nel 
capitolo 1), gli errori che, in genere, possono essere fatti vengono 
classificati in due categorie: 

- errori che si manifestano durante l'esecuzione di un programma, 
(run-time errors). Essi interrompono l'esecuzione e determinano la 
visualizzazione di un messaggio di errore. 

- errori logici, che consentono l'esecuzione completa del programma, ma 
portano a risultati sbagliati o inattesi. 

11 processo di individuazione della causa dell'errore (spesso denominato 
"bug") viene conosciuto con il termine di "debugging". L'M20 fornisce 
una serie di prestazioni che riducono i costi e le difficoltà di questo 
processo. 



TIPI DI ERRORE 



Run-time errors 
(errori individuati 
dall 'M20 durante 
l'esecuzione di un 
programma o di una 
linea immediata) 



Errori di logica 
(errori che consen- 
tono il completamento 
dell'esecuzione del 
programma, ma pro- 
ducono risultati 
errati o inattesi) 



COMMENTI 



possono essere errori di sintassi (quando una 
linea contiene una sequenza di caratteri non 
corretta) o altri tipi di errori di esecuzione 
(NEXT privo di FOR, RETURN privo di GOSUB, 
ecc. . . ) 

E' anche possibile simulare un errore BASIC, o 
generare un errore definito dall'utente (da 
gestirsi mediante una routine di error trap). 
Vedere le istruzioni ERROR e ON ERROR GOTO 
illustrate di seguito. 



sono gli errori più difficili da individuare, e 
sono denominati errori "logici". Per fornire un 
semplice esempio, si assuma di aver scritto un 
programma che deve stampare i risultati di 15 
calcoli. Se, a seguito dell'esecuzione del 
programma, vengono stampati solo 11 risultati, 
deve essersi verificata una qualche forma di 
errore. L'individuazione dell'errore, se il 
programma è lungo e complesso e contiene molti 
salti, cicli e sottoprogrammi, può risultare un 
compito non agevole. E' possibile che il 
controllo non sia stato trasferito all'istruzio- 
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ne prevista o che qualche calcolo non sia stato 
effettuato. Le possibilità di errore sono 
molteplici. 

In questi casi, può risultare molto utile poter 
sapere esattamente quali istruzioni vengono 
eseguite ed il flusso della loro esecuzione 



VISUALIZZAZIONE DEI NUMERI DI LINEA ESEGUITI (TRACING) 

Un metodo utile di debugging di errori logici consiste nel tracciare il 
flusso di esecuzione delle istruzioni per una parte o per l'intero 
programma. L'M20 fornisce, a questo proposito, due comandi che possono 
anche essere utilizzati come istruzioni nell'ambito di un programma. 



TRON/TROFF (PROGRAMMA/IMMEDIATO) 




TRON (TRACE ON) produce una lista dei numeri di linea di tutte le 
istruzioni eseguite. 

TROFF (TRACE OFF) arresta la lista iniziata con l'impostazione del 
comando TRON. 




Figura 13-1 Comando TRON 




Figura 13-2 Comandò TROFF 
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DEBUGGING E RECUPERO DEGLI ERRORI 



Esempio 



VIDEO 



TRON 
Ok 

LIST 
10 K=10 

20 FOR J=l TO 2 

30 L=K+10 

40 PR1NT J;K;L 

50 K=K+10 

60 NEXT 

70 END 

Ok 

RUN 

[10] [20] [30] [40] 1 
[50] [60] [30] [40] 2 
[50] [60] [70] 
Ok 

TROFF 
Ok 



20 



20 
30 



COMMENTI 



TRON setta l'indicatore di traccia 
che visualizza il numero di linea 
di ogni istruzione di programma 
eseguita. 1 numeri sono racchiusi 
tra parentesi quadre. 1 numeri, 
che non sono racchiusi tra paren- 
tesi quadre (nell'esempio) sono il 
risultato dell'esecuzione dell'i- 
struzione 

40 PR1NT J;K;L 

L'indicatore di traccia viene 
resettato con il comando TROFF 
oppure all'esecuzione di un coman- 
do NEW. 



INTERRUZIONE DELL'ESECUZIONE DI UN PROGRAMMA 

L'esecuzione di un programma viene interrotta quando: 

- si imposta Hl:W W<U . oppure 

- viene eseguita un'istruzione STOP, oppure un'istruzione END, oppure 

- viene emesso un messaggio d'errore 

Nei casi sopra ricordati, l'M20 entra in Stato Comandi (escluso nel caso 
di un errore di sintassi quando l'M20 entra in Stato Editor). 



In Stato Comandi è consentita la visualizzazione delle variabili di 
programma (con l'uso delle istruzioni immediate PR1NT e PR1NT US1NG) o 
la modifica del loro valore (con l'uso delle istruzioni immediate LET 
oppure SUIAP). E' possibile riprendere l'esecuzione del programma 
impostando il comando CONT (ad esclusione del caso in cui si è 
riscontrato un errore o quando l'utente ha modificato il programma). 
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END (PROGRAMMA) 



Fa terminare l'esecuzione del programma, chiude tutti i file dati e 
riporta l'M20 in Stato Comandi. 




Figura 13-3 Istruzione END 
Note 

Sebbene non sia necessario finire un programma con una istruzione END, 
questa istruzione è molto utile poiché chiude tutti i file dati aperti; 
inoltre aumenta la leggibilità del programma. L'istruzione END è anche 
usata per porre fine al programma al termine di una diramazione 
(branch). Ad esempio: 

250 1F 2 > 1000 THEN END 

L'istruzione END può essere inserita in qualsiasi parte di un programma 
per terminarne l'esecuzione. A differenza dell'istruzione STOP, l'istru- 
zione END non produce la visualizzazione del messaggio BREAK. 

L'esecuzione di un'istruzione END provoca sempre un ritor-o in Stato 
Comandi. L'utente può visualizzare i valori delle variabili di programma 
con l'uso dell'istruzione immediata PRINT (o PR1NT US1NG). L'utente può 
anche riprendere l'esecuzione del programma con il comando CONT però 
deve tener presente che la END ha chiuso tutti i file dati. 



STOP (PROGRAMMA) 




Interrompe l'esecuzione del programma e riporta l'M20 in Stato Comandi. 




Figura 13-4 Istruzione STOP 
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Note 



L'istruzione STOP, come l'istruzione END, può essere inserita in ogni 
parte del programma. Quando il controllo dell'esecuzione passa a questa 
istruzione, il messaggio seguente viene visualizzato: 

Break in line nnnnn 



A differenza dell'istruzione END, l'istruzione STOP non chiude i file. 

Il BASIC ritorna sempre in Stato Comandi dopo l'esecuzione dell'istru- 
zione STOP. L'utente può riprendere l'esecuzione del programma con il 
comando CONT (vedere in seguito). 



Esempio 



VIDEO 



LIST 

10 INPUT A,B,C 

20 X=A*B 

30 STOP 

40 X=X/C 

50 PR1NT X 

60 END 

Ok 

RUM 

? 4,3,6 
Break in 



30 



Ok 

PRINT 

12 
Ok 

CONT 
2 
Ok 



COMMENTI 



l'istruzione 30 permette di controllare ed 
osservare il primo valore di X prima che il 
secondo venga calcolato e visualizzato. In 
questo semplice caso, l'istruzione STOP non 
sembra molto utile, ma lo è, invece, nel caso di 
programma di grosse dimensioni. Impostando 
un'istruzione STOP alla fine di un trasferimento 
di controllo, il programma si arresterà solo se 
il trasferimento viene effettuato. Permette 
anche di assegnare nuovi valori alle variabili 
prima che l'esecuzione continui con l'uso del 
comando CONT. 

Quando il programma sarà sufficientemente veri- 
ficato, l'utente potrà cancellare tutte le 
istruzioni STOP, inserite per il debugging e 
potrà rinumerare il programma. 



CONT (IMMEDIATO) 



Permette di riprendere l'esecuzione di un programma interrotto da un 
Wì;f U, o da una istruzione STOP o da una istruzione EMO. 
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L'esecuzione riprende dal punto in cui si é verificata l'interruzione. 




Figura 13-5 Comando CONT 



Caratteristiche 



SE... 


ALLORA... 


HBHI H è stato 


l'esecuzione continua ristampando il prompt (? 


impostato dopo un 


seguito da uno spazio, o la stringa prompt) 


pronipt di una i- 




struzione INPUT 




si incontra una 


i valori intermedi possono essere esaminati e 


istruzione STOP 


modificati con l'uso delle istruzioni immediate 


o una istruzio- 


(PR1NT, PR1NT US1NG, LET, SWAP). 


ne END 






L'esecuzione può essere ripresa impostando il 




comando CONT o l'istruzione immediata GOTO, che 




rimanda il controllo dell'esecuzione ad un 




numero di linea specificato (l'impostazione di 




RUN numero di linea invece di GOTO numero di 




linea consente di ripartire dallo stesso punto, 




ma provoca l 'azzeramento di tutte le variabili 




del programma). 




Ad esempio: 




10 INPUT A,B,C 




20 K=AA2*5.3:L=BA3/.26 




30 STOP 




40 M=C*K+100:PRINT M 




RUN 




? 1,2.3 




Break in 30 




Ok 




PR1NT L 




30.7692 
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il programma è 
stato modificato 
durante l'interru- 
zione 

OPPURE 
si è verificato 
un errore 



Ok 

CONT 

115.9 
Ok 



CONT non è valido 



CONTRO LLO E RECUPERO DEGLI ERRO RI 

Di solito quando si incontra un errore il BASIC arresta l'esecuzione e 
visualizza un appropriato messaggio di errore. Se questo é un errore di 
sintassi l'MZO passa in Stato Edit, in tutti gli altri casi l'M20 passa 
in Stato Comandi. 

Spesso l'utente vuole trattare l'errore in modo diverso dallo standard. 

Questo può essere fatto scrivendo una routine di trattamento dell'er- 
rore. 

Usando istruzioni ON ERROR GOTO, é possibile introdurre una o più 
routine di gestione degli errori. 11 controllo viene trasferito alla 
linea specificata dopo GOTO, quando si é verificato un errore. Una sola 
routine di trattamento degli errori può essere attiva in un certo 
istante. L 'esecuzione di una istruzione "ON ERROR GOTO 0"al di fuori di 
una routine di trattamento dell'errore disattiva il trattamento non 
standard degli errori. 

L'esecuzione di una istruzione "ON ERROR GOTO 0" all'interno di una 
routine di gestione degli errori indica che un errore non trattato dalla 
routine deve essere gestito in modo standard. 

Nel caso si verifichi un errore run-time e il trattamento non standard 
degli errori sia abilitato, il controllo dell'esecuzione viene tra- 
sferito alla linea specificata. E' possibile allora fare uso delle 
funzioni ERR e ERL ed eseguire la routine di recupero dell'errore. La 
funzione ERR contiene il codice dell'errore, mentre la funzione ERL il 
numero della linea in cui è stato individuato l'errore. 
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La routine di gestione degli errori controlla tutti gli errori che 
l'utente desidera recuperare ed indica il nodo di gestirli. Ciò, di 
solito, porta come conseguenza la correzione dell'errore e la ripresa 
dell'esecuzione nel punto in cui si era verificato l'errore senza 
passare in Stato Comandi. 



Simula il verificarsi di un errore del linguaggio BASIC, oppure genera 
un errore definito dall'utente. 



Figura 13-6 Istruzione ERROR 



Dove 



ELEMENTO 01 SINTASSI 



numeric expression 



SIGNIFICATO 



il valore dell'espressione numerica rappresenta 
un codice di errore. 

Deve essere maggiore di 0 e minore o uguale a 
255. Se non è un intero, viene arrotondato 
all'intero più vicino. 

Nota : il BASIC non usa tutti i codici d'errore 
disponibili. 1 codici non utilizzati visualiz- 
zano il messaggio "Unprintable error". 
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Caratteristiche 


SE . . . 


Al 1 ORA 

rtL l_ Ur\M . • • 


i 1 valore dell 'e- 


1 ' i *?t ni7 1 onp FRROR «iintulprà il mptì fi rarci Hi 

1 1 J U Ut 1UI IC £ I\ rVU" o 1IIIU ICi a il vtr 1 1 lidi b I Ul 


sp re ss ione numer ica 


1" a 1 P Prrrtrp pH il mp^^anni fi Hi p r rn ro cnrri _ 

1 C «1 1 Ul V| CVJ 11 "ICqSdUU 1U Ul CI 1 Ul C LUI 1 l 


corrisoonde ad tin 


cnnnHonfp worra w i ci tal i 7Tatn 
5|JUI luci 1 le VCIId V 1 bua 1 1 ita LU > 


codice di errore 




del BASIC (vedere 


Ad esempio: 


1 'Appendice F) 






LIST 




10 S=10 




20 T=5 




IH FRROR S+T 

Jv tannUn jti 




40 END 




Ok 




RUN 




Strina too Iona in linp ìfl 




Ok 




Oddutp in c tatn i [Tìnipd ì afri 

vp^wi 111 j L a i_i 1 UIIIIC U 1 a \-U 




ERROR 15 




String too long 




Ok 


il valore dell 'e- 


l'istruzione ERROR aenera un prrorp ripfinirn 


spressione numerica 


dall'utente. Questo codice di errore può allora 


è maggiore di tutti 


essere convenient/pmente u^fltn in una ronfi np Hi 

w wwiiv\#»iilwiivI*"lwIII_C UJU LV 1 1 1 Lilla 1 uU LilIC u 1 


i codici di errore 


gestione degli errori (vedere ON ERROR GOTO qui 


del BASIC 


di seguito). 




N nfa " Ppr npfl ni rp i riPinr 1 /"firli ri Hi orrAro e i 
i'<j i. a . lei UC 1 1 ili i C 1 LflULJli LulllLi Ul CI [ (Jl C 51 




usi un valore che è fnaooinrp di tutti i mHiri 




di errore RA^IT (F* nrpfprihilp ncaro rnHiri 

' ' ci i wi c dm -j i \- vt» pi C i Ci ILil le Ubai c tuult 1 




prossimi a 255 -valore massimo-, così da 




mantenere la compatibilità nell'eventualità in 




cui più codici di errore siano aggiunti al 




linguaggio BASIC) 


un'istruzione ERROR 


il BASIC risponde con il messaggio: Unprintable 


specifica un codice 


error 


per il quale non è 




stato definito un 




messaggio di errore 
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ON ERROR GOTO (PROGRAMMA) 



Permette la gestione degli errori e specifica la prima linea della 
routine di gestione degli errori (ogni programma BASIC può avere solo 
una routine di gestione degli errori attiva in un dato istante). 



ON ERROR GOTO 



number 



Figura 13-7 Istruzione OH ERROR GOTO 



Dove 



ELEMENTO DI S1NTAS51 SIGNIFICATO 



line number è la prima linea di una routine di gestione 

degli errori. Deve essere maggiore di 0 e minore 
o uguale a 65529. 

Nota : L'istruzione ON ERROR GOTO 0 non trasferi- 
sce il controllo alla linea di numero 0, in caso 
di errore, ma disabilita la gestione non 
standard degli errori. 

Così se l'istruzione ON ERROR GOTO 0 è in una 
routine di gestione degli errori e questa 
istruzione viene eseguita quando un errore è 
ancora pendente allora viene visualizzato il 
messaggio standard di errore ed il sistema entra 
in Stato Comandi. 
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Esempio 



VIDEO 



COMMENTI 



110 ON ERROR GOTO 400 

120 INPUT "UHAT IS YOUR BET";B 

130 1F B>5000 THEN ERROR 210 



400 1F ERR=210 THEN PR1NT "HOUSE LIM1T 1S S5000' 
410 1F ERL=130 THEN RESUMÉ 120 
420 ON ERROR GOTO 0 



Se si introduce un 
valore di B maggiore 
di 5000, viene visua- 
lizzato il messaggio: 

HOUSE LIMIT IS $5000 

e l'esecuzione ripren- 
de alla linea 120. Se 
si incontrano altri 
errori, l'istruzione 
420 fa si che sia 
visualizzato il mes- 
saggio standard di 
errore. 



Caratteristiche 



SE... 


ALLORA... 


E' stata abilitata 
la gestione non 
standard degli erro- 
ri (tramite una 
istruzione 
ON ERROR GOTO) 


tutti gli errori individuati (inclusi gli errori 
verificatisi nelle linee ad esecuzione immedia- 
ta) determineranno un trasferimento alla routine 
di gestione dell'errore specificata 


il numero di linea 
dopo ON ERROR GOTO 
non esiste 


viene visualizzato il messaggio: 
Undefined line 


viene eseguita l'i- 
struzione ON ERROR 
GOTO 0 


la gestione non standard degli errori viene 
disabilitata. Errori successivi visualizzeranno 
un messaggio standard di errore ed interrom- 
peranno l'esecuzione. 


l'istruzione ON ERROR 
GOTO 0 é inserita in 
una routine di ge- 
stione degli errori 


il programma BASIC si arresta e viene visualiz- 
zato il messaggio standard di errore per 
l'errore che ha causato l'attivazione della 
routine. 
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si verifica un errore 
durante l'esecuzione 
di una routine di 
gestione non standard 
degli errori 



Nota: Si raccomanda che tutte le routine di 



gestione degli errori eseguano una istruzione ON 
ERROR GOTO 0 nel caso in cui si verifichi un 
errore di cui non è previsto il recupero. 



il programma BASIC evidenzia un messaggio di 
errore e l'esecuzione termina. Non è possibile 
trasferire il controllo alla routine di gestione 
degli errori quando un errore si verifica 
nell'ambito della stessa routine. 



Nota 

Non è consentito gestire in modo non standard gli errori di "overflow" e 
"division by zero". 



I ERL/ERR (PROGRAMHA/ IMMEDIATO) 



Quando si verifica un errore, la funzione ERL fa ritornare il numero di 
linea nella quale l'errore è stato individuato, mentre la funzione ERR 
fa ritornare il codice di errore. 




Figura 13-8 Funzione ERL 
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DEBUGGING E RECUPERO DEGLI ERRORI 



Caratteristiche 

Le funzioni ERL e ERR vengono generalmente, utilizzate nelle istruzioni 

1F. . .THEN. . .ELSE oppure 1F GOTO . . .ELSE per trasferire il controllo 

d'esecuzione alla routiie di gestione degli errori. 



SE. . . 



1 ' istruzione che 
ha causato l'er- 
rore è stata una 
istruzione immediata 



line number non è 
sul lato destro del- 
1 'operatore di con- 
fronto 



ALLORA... 



ERL conterrà il valore 65535. 

Per verificare se si è verificato un errore in 
una istruzione immediata si usi: 

1F 65535=ERL THEN... 

Altrimenti, si usi: 

1F ERR = error code THEN. . . 
IF ERL = line number THEN... 



I non può essere attribuito un nuovo numero di 
linea mediante la funzione RENUM 



Esempio 



VIDEO 



LIST 

10 REM RETTANG0L02 
20 ON ERROR GOTO 70 



30 
40 



INPUT "Base e Altezza";B,H 
IF (B--0) OR (H<0) THEN ERROR 200 
50 PR1NT "Area="; B*H;" B=";S;" H=";H 
60 GOTO 30 

70 IF (ERR=200) AND (ERL =40) 

THEN PRINT "B o H<0":RESUHE 30 
80 ON ERROR GOTO 0 
90 END 
Ok 
RUN 

Base e Altezza? -2,5 



COMMENTI 



Se si imposta un valo- 
re negativo per B 
oppure per H, la rou- 
tine di gestione del- 
l'errore viene attiva- 
ta ed il sistema vi- 
sualizza: 

B o H - 0 

L'esecuzioi.e viene ri- 
presa all'istruzione 
30 (vedere l'istruzio- 
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B o H < 0 

Base e Altezza? 2,5 
Area= 10 B= 2 H= 5 
Base e Altezza? A C 
Break in 30 
Ok 



ne RESUMÉ qui di se- 
guito) . 

Si noti 1 'uso di ERR e 
di ERL nella routine 
di gestione degli er- 
rori 



Note 

Queste funzioni possono essere usate anche come normali funzioni BASIC. 
Per esempio: 
PR1NT ERR 

PR1NT "Troppo grande", ERL 
1% = ERR 



RESUMÉ (PROGRAMMA) 




Riprende l'esecuzione del programma principale dopo aver eseguito una 
routine di gestione degli errori. 



>f RESUMÉ^ f «■ *CiÒ 



number 



Figura 13-10 Istruzione RESUMÉ 
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Dove 



ELEMENTO 01 SINTASSI 




SIGNIFICATO 


( 




l'esecuzione riprende all'istruzione che ha 

pjìii^atn 1 'orrnr* 
(.ausa lu i ci i di c. 

Nota: RESUMÉ 0 e RESUMÉ sono equivalenti 


NEXT 




l'esecuzione riprende alla prima istruzione 
successiva a quella che ha causato l'errore 


line number 




l'esecuzione riprende al numero di linea speci- 
ficato 



Note 

Un'istruzione RESUMÉ che non è inclusa nella routine di gestione degli 
errori fa visualizzare il messaggio "RESUMÉ without error". 



Esempi 



VIDEO 




COMMENTI 


LIST 






10 REM RETTANG0L03 




se si introduce un 


20 0N ERROR GOTO 70 




valore negativo per B 


30 INPUT "Base e Altezza";B,H 




oppure H, la routine 


40 1F (B<0) OR (H<0) THEN ERROR 200 




di gestione degli er- 


50 PRINT "Area=";B*H;"B=";B;" H=";H 




rori viene attivata. 


60 GOTO 30 






70 1F (ERR=200) AND (ERL=40) THEN RESUMÉ 




In questo caso la 


80 0N ERROR GOTO 0 




routine determina la 


90 END 




ripresa dell'esecu- 


Ok 




zione all'istruzione 


RUN 




che ha causato l'er- 


Base e Altezza? -2,5 




rore, causando in 


AC 




questo modo un ciclo 


Ok 




senza fine. 






Per fermare l'esecu- 






zione agire su MW 

m 

-i 
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70 IF (ERR=200) 


ANO (ERL=40) THEN RESUMÉ NEXT 


correggendo così la 


RUN 




linea 70, l'errore 


Base e Altezza? 


-2,5 


viene ignorato 


Area=-10 B=-2 H= 5 




Base e Altezza? 


AC 




Break in 30 






Ok 






70 1F (ERR=200) 


AND <ERL=40) THEN RESUMÉ 30 


correggendo così la 


RUN 




linea 70 la routine di 


Base e Altezza? 


-2,5 


gestione degli errori 


Base e Altezza? 


2,5 


fa sì che l'esecuzione 


Area= 10 B= 2 H 


= 5 


sia ripresa alla linea 


Base e Altezza? 


AC 


30 


Break in 30 






Ok 







r*-> 
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14. GRAFICA 



SOMMARIO 

Questo capitolo intende far conoscere all'utente le prestazioni grafiche 
disponibili sull'M20 e le loro modalità d'uso. 

In un "computer" la grafica è il mezzo con il quale l'informazione viene 
rappresentata sotto forma di figura; una qualunque conbinazione di testi 
e di figure è "grafica". 



INDICE 



INTRODUZIONE 



FINESTRE 



14-1 
14-2 



W1ND0U - Per aprire una 14-4 
finestra (PROGRAMMA/ IMMEDIATO) 

U1ND0U - Per variare lo 14-9 
spazio tra linee e caratteri 
(PROGRAMMA/ IMMEDIATO) 

W1ND0W - Per selezionare una 14-11 
finestra (PROGRAMMA/ IMMEDIATO) 



CLOSE UINDOU 
(PROGRAMMA/ IMMEDIATO 

USO DEL COLORE 



14-13 



14-14 



COLOR - Per selezionare i 14-17 
colori contemporanei 
(PROGRAMMA/ IMMEDIATO) 

COLOR - Per selezionare i 14-18 
colori di foreground e di 
background (PROGRAMMA/IMMEDIATO) 

CLS (PROGRAMMA/IMMEDIATO) 14-20 

SISTEMI DI COORDINATE 1 4-20 

SCALE (PROGRAMMA/ IMMEDIATO) 14-22 

SCALEX ( PROGRAMMA /IMMEDIATO) 14-25 



SCALEY (PROGRAMMA/IMMEDIATO) 14-26 

VISUALIZZAZIONE DI PUNTI 14-27 

PSET (PROGRAMMA/ IMMEDIATO) 14-27 

PRESET (PROGRAMMA/IMMEDIATO) 14-28 

POINT (PROGRAMMA /IMMEDIATO) 14-29 

VISUALIZZAZIONE DEI CURSORI 14-30 

CURSOR (PROGRAMMA/ IMMEDIATO) 14-31 

POS (PROGRAMMA/IMMEDIATO) 14-34 

COME TRACCIARE FIGURE 14-35 

LINE (PROGRAMMA/IMMEDIATO) 14-36 

C1RCLE (PROGRAMMA/ IMMEDIATO) 14-39 

DRAW (PROGRAMMA/IMMEDIATO) 14-42 

PAINT (PROGRAMMA/IMMEDIATO) 14-48 

C OME MEMORIZZARE E V1SUAL1Z- 14-52 
ZARE FINESTRE E RETTANGOLI 

GET - Grafica 14-52 
(PROGRAMMA/ IMMEDIATO) 

PUT - Grafica 14-54 
(PROGRAMMA/ IMMEDIATO) 

P RESTAZ ION I GRAFICHE 14-58 
FORNITE DAL PCOS 



14-ii 



GRAFICA 



INTRODUZIONE 

L'M20 è disponibile in due versioni: con video in bianco e nero e con 
video a colori. In entrambi i casi l'utente può visualizzare una matrice 
di 512 x 256 "pixel" oppure 480 x 256 "pixel", dove il termine " pixel è 
l'abbreviazione di "picture element" (elemento di figura). Un elemento di 
figura è un punto luminoso del video e una riga di punti luminosi co- 
stituisce una "s canline ". 

La scelta dell'una o dell'altra modalità di visualizzazione viene fatta 
dall'utente tramite il comando SSYS del PC05 oppure tramite l'istruzione 
UINDOW (per variare lo spazio tra linee e caratteri). 

Le dimensioni massime dell'immagine su video sono: 225 mm in orizzontale 
e 140 mm in verticale. 



64 colonne x 16 linee 



80 colonne x 25 linee 



3* 

1 

5. 


512 'pixels' 


ì 





5 

X 

d 


1 

480 'p 


r 

ixels' 


io 





Figura 14-1 Modalità di visualizzazione (512 x 256 oppure 480 x 256) 

Le linee di testo che compaiono sul video possono contenere un numero 
massimo di 64 o 80 caratteri. Anche lo spazio tra una linea di testo e la 
successiva può variare; sul video può esserci da un minimo di 16 linee 
fino ad un massimo di 25. 

Un M20 con video a colori può essere un sistema a 4 oppure a 8 colori. 
Nella versione a 4 colori, i caratteri e la grafica possono essere 
visualizzati usando quattro colori, scelti tra 8 possibili (tramite 
l'istruzione COLOR - Per selezionare i colori contemporanei). 

Nella versione a 8 colori i caratteri e la grafica possono essere 
visualizzati usando tutti gli otto colori Contemporaneamente. 



Gli otto colori possibili sono: nero, verde, blu, cyan, rosso, giallo, 
magenta, e bianco. 
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In una versione a colori, il colore di fondo del video (detto anche 
colore di background) è nero e il colore di primo piano con cui l'utente 
visualizza i caratteri e la grafica (detto anche colore di foreground) è 
di norma verde. 

Nella versione in bianco e nero, invece, il colore di background è nero 
ed il colore di foreground è bianco. 

Con qualsiasi tipo di video è possibile variare questi due colori, con 
l'uso dell'istruzione COLOR - Per selezione i colori di foreground e di 
background. Ovviamente per il video in bianco e nero è solo possibile 
scambiare i due colori. 

In entrambe le versioni dell'M20, il video può essere suddiviso 
dall'utente in aree rettangolari, chiamate finestre ("windows"). 



FINESTRE 

Su una finestra, l'utente può operare esattamente come sull'intero video; 
su essa può eseguire sia operazioni di grafica sia di testo e possono 
quindi coesistere sia figure sia linee di testo. Le operazioni eseguite 
su finestre diverse sono completamente indipendenti. 

Le dimensioni delle finestre vengono stabilite con l'istruzione W1ND0U 
(per aprire una finestra) descritta in seguito. 

Se viene fatto un tentativo di disegnare una figura o una stringa di 
caratteri di date dimensioni e orientamento (tramite il comando LABEL del 
PCOS) e se questa figura o questa stringa cadono parzialmente fuori dalla 
finestra sulla quale si opera (finestra attuale), solo la porzione che 
cade dentro la finestra viene tracciata e la parte esterna viene ignorata 
("clipped"). 

Supponiamo di eseguire operazioni di grafica ; in questo caso l'utente può 
operare definendo un proprio sistema di coordinate ("coordinate utente") 
adatto al problema da trattare (vedere l'istruzione SCALE) oppure usare 
il sistema di coordinate di default (vedere il paragrafo "Sistemi di 
Coordinate") . 

Nel sistema di coordinate di default l'origine è posta nell'angolo infe- 
riore sinistro della finestra, il semi-asse positivo delle x va 
dall'origine verso destra; il semi-asse positivo delle y va dall'origine 
verso l'alto e la finestra viene suddivisa in 512 unità lungo l'asse 
delle x e 256 unità lungo l'asse delle y. Le coordinate di ogni punto 
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sono quindi espresse in coordinate utente, a meno che si operi sull'in- 
tero video - non suddiviso in finestre - e sia stata scelta la modalità 
di visualizzazione 512 x 256 (cioè 64 colonne x 16 linee). In questo caso 
soltanto le coordinate di ogni punto sono coordinate "hardware", cioè 
espresse in pixel. Operando con coordinate hardware è possibile 
individuare un pixel specificando le sue coordinate; operando con 
coordinate utente è possible soltanto individuare il pixel che è il più 
vicino alle coordinate specificate. 



Supponiamo di eseguire operazioni su linee di testo . In questo caso 
l'origine (ovvero la posizione in cui verrà visualizzato il primo carat- 
tere impostato) coincide con l'angolo superiore sinistro della finestra. 
Le coordinate di ogni carattere di testo vengono, sempre, espresse in 
termine di numero di riga e di numero di colonna, quindi l'angolo 
superiore sinistro corrisponde alle coordinate (1,1). E' possibile, però, 
iniziare a visualizzare un carattere da qualunque altra posizione sul 
video con l'uso dell'istruzione CURSOR (descritta in seguito). 

Le coordinate grafiche sono completamente indipendenti dalle coordinate 
di testo. 



Ogni finestra, in cui il video è stato suddiviso ha due cursori: il 
cursore di testo e il cursore grafico. Entrambi i cursori possono essere 
posizionati e visualizzati dall'utente in qualunque posizione del video 
con l'uso dell'istruzione CURSOR. 



Si osservi, però, che il cursore di testo si sposta automaticamente di 
una posizione ogni volta che un carattere viene impostato; mentre, quando 
viene eseguita un'istruzione di grafica il cursore grafico non si sposta. 

Quando l'utente entra in ambiente BASIC, è presente una sola finestra 
(l'intero video, cioè la finestra numero 1) e il sistema di coordinate è 
quello di default. L'utente può definire (aprire) una nuova finestra come 
una porzione rettangolare di una qualsiasi finestra già esistente. 

Per fare ciò, l'utente deve usare l'istruzione W1ND0W - Per aprire una 
finestra. 11 numero massimo di finestre aperte contemporaneamente è 16. 
11 comando SBASIC del PCOS può allocare spazio in memoria per un 
prefissato numero di finestre. 



n 
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WINDOW - Per aprire una finestra (PROGRAMMA/IMMEDIATO) 



Apre una nuova finestra, suddividendo la finestra attuale ("current 
window"). Per finestra attuale si deve intendere la finestra sulla quale 
l'utente si trova ad operare. 

Quando si apre una nuova finestra, la finestra attuale che l'ha generata 
è anche detta "parent window" (finestra genitrice). L'istruzione apre, ma 
non seleziona, una nuova finestra (vedere WINDOW - Per selezionare una 
finestra). 



Figura 14-2 Istruzione WINDOW - Per aprire una finestra 



Dove 



ELEMENTO DI SINTASSI 



window number variatile 



SIGNIFICATO 



è una variabile intera, alla quale il sistema 
operativo assegna un valore, che identifica la 
finestra da aprire. 

Questo valore è un intero da 2 a 16. 1 valori 
vengono assegnati dal sistema in ordine crescen- 
te. 

La finestra che inizialmente coincide con 
l'intero video viene identificata con il numero 
1, la prima che viene aperta dall'utente con il 
numero 2 ecc. 
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Supponiamo, ad esempio, che l'utente stia 
operando sulla finestra identificata dal numero 
4 e decida di aprirne un'altra: a questa nuova 
finestra il sistema assegnerà il numero 5, a 
meno che una finestra con il numero 2 oppure 3 
sia stata chiusa (v. istruzione CLOSE W1ND0U) 
perché, in tal caso, alla nuova finestra verrà 
assegnato il più piccolo numero disponibile. La 
finestra 1 non può mai essere chiusa. 

La finestra che ha dato luogo alla nuova 
finestra viene chiamata la finestra "genitrice" 
("parent window"). In questo esempio la finestra 
4 viene detta finestra genitrice. 

Nota : 11 sistema considera l'intero video come 
la finestra principale e, pertanto, gli assegna 
il numero 1, che la identifica sempre, anche se 
in seguito viene suddivisa in altre finestre. 

specifica dove, all'interno della finestra 
"genitrice", la nuova finestra deve essere 
aperta. 

L'utente dispone di quattro possibilità: 

0 nella parte alta della finestra "genitrice" 

1 nella parte bassa 

2 nella parte sinistra 

3 nella parte destra 

individua la posizione, in corrispondenza della 
quale la finestra "genitrice" viene suddivisa 
per dar luogo ad una nuova finestra 

Se il valore del parametro 'quadrant' è 0 oppure 
1, la suddivisione è orizzontale. In questo 
caso, il parametro 'position' è un numero intero 
di "scanline" compreso nell'intervallo, i cui 
estremi sono: 

limite inferiore = 1 

limite superiore = 255 

► 
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Nota : La posizione della linea di suddivisione 
(che non viene visualizzata) è, sempre, calcola- 
ta a partire dall'alto della finestra genitrice. 



Se "quadrant" vale 2 oppure 3, la suddivisione è 
verticale. In questo caso, il parametro "posi- 
tion" è un numero intero di caratteri, compreso 
nell'intervallo, i cui estremi sono: 



vertical spacing 



limite inferiore = 1 

limite superiore = larghezza della finestra ge- 
nitrice, diminuita di una 
unità. 

Se "quadrant" vale 2 oppure 3, la linea di 
suddivisione (che non viene visualizzata) è 
calcolata a partire dal bordo sinistro della 
finestra genitrice. 

Nota : se "position" è uguale a 1 , la finestra 
genitrice viene suddivisa a metà (verticalmente 
oppure orizzontalmente, in funzione del valore 
di quadrant). 



è un parametro opzionale, che stabilisce il 
numero di "scanline" per ogni linea di testo 
della finestra da aprire. Ha, come valore 
minimo, 10 (sull'intero video vengono visualiz- 
zate 25 linee di testo) e come valore massimo 16 
(16 linee di testo) . 

Se vengono omessi sia il parametro vertical 
spacing sia il parametro horizontal spacing, 
viene assunto il vertical spacing della finestra 
genitrice. Se invece viene omesso solo il 
parametro vertical spacing ed il parametro 
horizontal spacing è diverso da quello della 
finestra genitrice, allora il vertical spacing 
viene assunto pari a 16 se 1 'horizontal spacing 
è 8 e pari a 10 se 1 'horizontal spacing è 6. 
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horizontal spacing parametro opzionale che stabilisce lo spazio che 

deve essere presente fra due caratteri contigui 
in una linea di testo (per la finestra da 
aprire). Viene espresso in termine di numero di 
'pixel' e può assumere due valori : 6 oppure 8. 

11 primo di questi due valori consente un 
massimo di 80 caratteri per una linea completa 
di testo (sull'intero video), il secondo 64. 

Per default, horizontal spacing assume il valore 
del parametro omonimo della finestra genitrice. 



Note 

Quando una finestra viene aperta il precedente contenuto di quell'area di 
video viene cancellato e, come colori di background e di foreground, 
vengono assunti quelli della finestra genitrice. 



Esempi 



SE l'utente imposta... 



A=U1ND0W (0,100) M3M 



ALLORA... 



la suddivisione è orizzontale, la nuova 
finestra viene ad essere la parte alta della 
finestra genitrice. 

L'altezza della finestra da aprire è 100 
scanline. 1 parametri horizontal spacing e 
vertical spacing assumono i valori di default 
(quelli della finestra genitrice). 
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A=W 1ND0W (0,100,14) WÌM 


come sopra, con l'unica eccezione che lo spa- 
zio fra due linee contigue di testo è di 14 
scanline. 


B=U1NDOW(2,50) K*M 


la suddivisione è verticale, la nuova finestra 
viene ad essere la parte sinistra della 
finestra genitrice. La larghezza della fine- 
stra da aprire è 50 posizioni di carattere. 

I parametri horizontal spacing e vertical 
spacing assumono i valori di default. 


A=U1NDOU(0,100) Iti 
PRINT A li! 


l'istruzione WINDOW apre una finestra, che 
l'utente identifica con la variabile A. 11 
sistema operativo assegna un valore intero a 
questa variabile.il contenuto di A viene, poi, 
visualizzato con l'uso dell'istruzione PRINT 
A. 


A=3:D=40:F=15:G=8 «il 
W=U1ND0W(A,D,F,G) Bl 


la suddivisione è verticale. La nuova finestra 
è la parte destra della finestra "genitrice". 
La lunghezza della finestra da aprire è 50 
posizioni di carattere. 

11 parametro vertical spacing vale 15 scanline 
ed ogni linea complèta di testo può contenere 
64 caratteri. 


W2=UJlNDOW(1 ,184,16) Bl 
W3=WINDOW(0,50,16) W*m 
W4=WlNuOW(2,16,16) Bl 
W5=W1ND0U(3,43,16) W4M 


queste istruzioni W1ND0U suddividono il video 
in 5 finestre. Nella figura qui di seguito 
riportata viene indicata la sequenza di questa 
suddivisione 
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Figura 14-3 Sequenza con la quale vengono aperte le finestre 



Note 

Si è visto come l'utente possa specificare, al momento dell'apertura di 
una finestra, sia lo spazio verticale fra linee contigue di testo, sia lo 
spazio orizzontale fra caratteri contigui su una stessa linea. 

In alcuni casi, può risultare necessario variare questi due valori 
relativamente ad una finestra, che è già stata aperta. Questo può essere 
fatto con l'uso della istruzione W1ND0W, ponendo a zero i parametri 
quadrant e position. 



U1ND0U - Per variare lo 



spazio tra linee e caratteri 
( PROGRAMMA/ IMMEDIATO ) 



0 



Con questa istruzione non viene aperta alcuna nuova finestra. Viene 
usata, semplicemente, per variare lo spazio fra caratteri e/o lo spazio 
fra linee di testo della finestra attuale. 



14-9 








venic*l 






JpdCt'KJ 




spaclng 



Figura 14-4 Istruzione W1ND0W 
caratteri 



- Per variare lo spazio tra linee e 



Dove 



ELEMENTO 01 SINTASSI 


SIGNIFICATO 


window number variable 


è una variabile intera, alla quale il sistema 
assegna il numero della finestra attuale. 


0 


valore del parametro quadrant 


0 


valore del parametro position 



vertical spacing 



è un parametro opzionale, che stabilisce il 
numero di scanline per ogni linea di testo della 
finestra attuale. 



Ha come valore minimo 10 (sull'intero video ven- 
gono visualizzate 25 linee di testo) e come 
valore massimo 16 (16 linee di testo). Se vengo- 
no omessi sia il vertical spacing sia 
l'horizontal spacing, lo spazio tra le linee 
rimane immutato. 



Se viene omesso solo il vertical spacing e 
l'horizontal spacing ha un valore diverso dal 
valore in vigore per la finestra attuale, il 
vertical spacing sarà 16 se l'horizontal spacing 
è 8 e sarà 10 se l'horizontal spacing è 6. 
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horizontal spacing 



è un parametro opzionale, che stabilisce lo 
spazio fra due caratteri contigui in una linea 
di testo. 



Viene espresso in numero di 'pixel' e può 
assumere due valori: 6 oppure 8. 11 primo di 
questi due valori consente un massimo di 80 
caratteri per una linea completa di testo; il 
secondo 6<ì. 



Se omesso, lo spazio fra caratteri rimane 
immutato. 



Note 



Al momento dell'accensione dell'M20, è presente una sola finestra, che 
coincide con l'intero video e che ha numero 1. 11 parametro horizontal 
spacing ha valore 8 ed il parametro vertical spacing ha valore 16, così 
sull'intero video può essere visualizzato un numero massimo di 16 linee 
di testo, con 64 caratteri per linea (nell'ipotesi di usare un PCOS 
standard ) . 

L'utente può variare questa modalità di visualizzazione ed avere 25 linee 
di testo con 80 caratteri ciascuna sia usando il comando SSYS del PCOS, 
sia usando l'istruzione WINDOW. In quest'ultimo caso, dopo essere entrato 
in BASIC, l'utente deve usare l'istruzione WINDOW (per variare lo spazio 
tra linee e caratteri) e porre il parametro horizontal spacing uguale a 6 
ed il parametro vertical spacing uguale a 10. 

E' possibile solo avere 64 oppure 80 colonne, ma è possibile variare il 
numero di righe da un minimo di 16 a un massimo di 25, sempre tramite 
questa istruzione WINDOW, variando opportunamente il parametro vertical 
spacing da 16 a 10. 



Seleziona la finestra su cui operare. La finestra selezionata diviene la 
finestra attuale. 




WINDOW - Per selezionare una finestra (PROGRAMMA/ IMMEDIATO) 
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Figura 14-5 Istruzione WINDOW - Per selezionare una finestra 



Dove 



ELEMENTO DI S1NTA551 



window number 
expression 



SIGNIFICATO 



è una espressione numerica, il cui valore, 
arrotondato all'intero più vicino, identifica 
una finestra già aperta in precedenza e la 
seleziona. 

11 parametro window number expression può 
assumere solo valori interi da 1 a 16 e deve 
corrispondere ad una finestra esistente, altri- 
menti si ha una segnalazione d'errore. 



Esempi 



SE l'utente imposta. 
WINDOW \A 



WINDOW VI Bl 



ALLORA... 



il sistema seleziona la finestra identificata 
dal valore intero, contenuto nella variabile A. 
Se questo valore è noto iad es.2), l'istruzione 
WINDOW può essere impostata anche nel modo 
seguente : 

WINDOW %2 MiM 



lì sistema seleziona la finestra identificata 
dal numero 1. Come noto, questa è la finestra 
principale (cioè l'intero video o la finestra 
risultante per successive suddivisioni) 
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SE WINDOU (PROGRAMMA/ IMMEDIATO) 



Chiude una finestra specificata o tutte le finestre aperte. 



CLOSE WINDOW 




Figura 14-6 Istruzione CLOSE WINDOU 



Dove 



window 
number 
expression 



ELEMENTO DI SINTASSI 



window number 
expression 



SIGNIFICATO 



è una espressione numerica, arrotondata all'in- 
tero più vicino, il cui valore identifica la 
finestra da chiudere. 

Se window number expression viene omesso il 
sistema ritorna allo "stato iniziale" (una sola 
finestra: l'intero video). 



Caratteristiche 

L'istruzione CLOSE WINDOW, se eseguita con il parametro window number 
expression, chiude la finestra identificata dal parametro. 

Il sistema assegna l'area della finestra che viene chiusa al rettangolo 
che era stato suddiviso al momento della sua apertura e quest'area viene 
ad avere il colore di background della finestra a cui viene assegnata. 
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Nota 



L'istruzione CLOSE WINDOW, se fatta operare sulla finestra principale, 
non produce alcun effetto. La finestra numero 1 (o finestra principale) 
non può mai essere chiusa. 



USO DEL COLORE 

Come predetto in M20 con video a colori può essere un sistema a 4 oppure 
a 8 colori, a seconda che i colori contemporanei possono essere 4 oppure 

a. <y 

11 video a colori è comunque lo stesso: si passa da 4 a 8 colori 
aggiungendo una piastra di memoria e variando opportunamente alcuni 
ponticelli . 

Con un video in bianco e nero esiste in memoria una sola matrice di bit 
(Bit-Map) corrispondente ai pixel del video, per cui ogni pixel 
corrisponde a un bit della Bit-Map. 

Con un video a 4 colori esistono in memoria due matrici di bit 
sovrapposte, per cui ogni pixel corrisponde a due bit della Bit-Map. 
Quindi 4 colori possono essere associati a ogni pixel, dato che due bit 
possono generare i numeri da 0 a 3. 

Nella versione a 4 colori l'utente ha la possibilità di visualizzare i 
pixel con 4 colori scelti tra gli 8 possibili, tramite l'istruzione COLOR 
(per selezionare i colori contemporanei). 

Con un video a 8 colori esistono in memoria tre matrici di bit sovrap- 
poste, per cui ogni pixel corrisponde a tre bit della Bit-Map. Quindi 8 
colori possono essere associati a ogni pixel, dato che tre bit possono 
generare i numeri da 0 a 7. 

Nella versione a 8 colori l'utente ha la possibilità di visualizzare i 
pixel con tutti gli 8 colori a disposizione. 



Codici di Colore 

La tabella, riportata qui di seguito, elenca i colori dell'M20 e i 

corrispondenti codici di colore ("colour codes"). Questa tabella è valida 

sia per un sistema a quattro che per un sistema a otto colori. 
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romrF ni mi orf 


rni nRF 


0 


nero 


1 


verde 


2 


blu 


3 


cyan (turchese) 


4 


rosso 


5 


giallo 


6 


magenta 


7 


bianco 



Tabella 14-1 
Numeri di Colore 

Molte istruzioni di grafica hanno un parametro detto "numero di colore". 

I numeri di colore coincidono con i codici di colore in un sistema a 8 
colori . 

In un sistema a 4 colori, invece, i numeri di colore non sono sinonimi 
dei codici di colore, ma ogni numero viene associato a un codice di co- 
lore tramite l'istruzione COLOR (per selezionare i colori contemporanei). 
L'associazione (o "mapping") a viene in questo modo: il numero di colore 
può solo essere un numero intero tra 0 a 3 e rappresenta la posizione che 
è stata assegnata a un codice di colore nell'istruzione COLOR predetta: 
essa specifica sempre, alla destra del segno di uguale, 4 codici di 
colore scelti tra gli 8 possibili (il primo codice da sinistra viene 
associato al numero di colore 0, il secondo al numero 1 ecc.). L'istru- 
zione COLOR predetta non ha alcun effetto né per un sistema a 8 colori 
(dato che i numeri di colore coincidono con i codici di colore) né per un 
sistema con video bianco e nero, dove il numero di colore è un intero che 
può solo essere 0 (a rappresentare il nero) oppure 1 (a rappresentare il 
bianco) . 



Colori di Default 

In un sistema a 4 colori, se l'istruzione COLOR (per selezionare i colori 
contemporanei) non viene eseguita, il sistema assume 4 colori di default 
che sono il nero, il verde, il blu, e il rosso. Si noti che è come se 
fosse stata eseguita l'istruzione: 

COLOR = 0, 1 , ?, 4 

in un sistema a 8 colori non esistono colori di default, dato che tutti 
gli 8 colori sono sempre disponibili. 
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Colori di Background e di Foreground 

Ogni finestra ha un colore di background (cioè un colore di fondo) e un 
colore di foreground (cioè di primo piano, ovvero il colore con cui si 
visualizzano i caratteri e le figure, tracciate con istruzioni di grafica 
che non specificano un diverso numero di colore). 

1 colori di background e di foreground possono essere scelti dall'utente 

0 assunti per default. 

1 valori di default (sia per un video bianco e nero, sia per un video a 
colori) corrispondono ai numeri di colore 0 (background) e 1 (fore- 
ground). A questi numeri sono associati i colori: 

- nero (background) e bianco (foreground) per un video bianco e nero; 

- nero (background) e verde (foreground) per un video a 8 colori; 

- nero (background) e verde (foreground) per un video a 4 colori, se non 
viene eseguita una istruzione COLOR (per la selezione dei colori 
contemporanei ) . 

Se invece viene eseguita detta istruzione, i colori di background e 
foreground sono rispettivamente il primo e il secondo colore specifica- 
ti nell'istruzione. 

L'utente può specificare numeri di colore di background e di foreground 
diversi dai numeri di colore di default tramite l'istruzione COLOR (per 
selezionare i colori di foreground e di background). Con un video bianco 
e nero l'utente può solo invertire i due valori di default e avere quindi 
il bianco come colore di fondo e il nero come colore di primo piano. 

Colore del Cursore 

Ogni finestra na due cursori: uno di testo e uno grafico (vedere para- 
grafo "Visualizzazione dei Cursori"). 

Nella versione a 4 colori il colore del cursore (sia di testo che 
grafico) corrisponde all'ultimo codice di colore nell'istruzione COLOR 
(per selezionare i colori contemporanei) oppure è il ross o, se detta 
istruzione non viene eseguita. Infatti, in assenza di detta istruzione, è 
come se fosse stata eseguita l'istruzione: 

COLOR = 0, 1. 2, 4 
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Nella versione a 8 colori il colore del cursore 
grafico) è sempre il bianco. 



(sia di testo che 



E 1 possibile cambiare la forma del cursore, sia grafico sia di testo, con 
l'istruzione CURSOR, ma non è possibile cambiarne il colore (se non per 
un sistema a 4 colori). L'unico modo per cambiare il colore del cursore 
è, limitatamente a un sistema a 4 colori, quello di eseguire un'altra 
istruzione COlOR con un diverso codice di colore in quarta posizione. 



I 



COLOR - Per selezionare i colori contemporanei (PROGRAMMA/ IMMEDIATO) 



Seleziona i quattro colori contemporanei tra gli otto possibili (in un 
sistema con video a 4 colori). 



Con un video bianco e nero o con un video a otto colori questa 
istruzione, se usata, non ha alcun effetto. 



Figura 14-7 Istruzione COLOR - Per selezionare i 4 colori contemporanei 



Dove 



ELEMENTO DI SINTASSI 



SIGNIFICATO 



colour code 



è una espressione numerica, che assume un valore 
intero da 0 a 7. A ciascuno di questi valori 
corrisponde un colore, come indicato nella 
Tabella 14-1 . 

Se l'espressione numerica non dà risultato inte- 
ro, questo viene arrotondato all'intero più 
vicino. 



14-17 



COLOR - Per selezionare i colori di foregound e di background 
(PROGRAMMA/IMMEDIATO) 



Seleziona i colori di foreground e di background per una finestra 
specificata. 




Figura 14-8 Istruzione 


COLOR 


Dove 




ELEMENTO DI SINTASSI 


SIGNIFICATO 


window nutnber 
expression 


è una espressione numerica il cui valore, 
arrotondato all'intero più vicino, seleziona la 
finestra su cui operare. E' opzionale. Se 
omessa, il sistema opera sulla finestra attuale. 


foreground colour 


è un numero di colore, che individua e seleziona 
il colore di foreground 


background colour 


è un numero di colore, che individua e seleziona 
il colore di background. Se omesso, il preceden- 
te colore di background rimane immutato. 



Caratteristiche 

Sia nella versione con video bianco e nero, sia nelle versioni con video a 
4 o a 8 colori, i numeri di colore sono 0 per il colore di background (di 
default) e 1 per il colore di foreground (di default). 

I colori di background e di foreground di una finestra possono essere va- 
riati con l'uso della predetta istruzione COLOR per tutti i tipi di 
video. 
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Questa variazione non è di immediata visualizzazione e l'utente, per 
rendersene conto, dopo l'esecuzione dell'istruzione COLOR, deve effettua- 
re una delle seguenti operazioni: 

1. Eseguire l'istruzione CLS (descritta in seguito, nel capitolo): in 
questo modo la finestra selezionata assume il nuovo colore di 
background. 

2. Eseguire l'istruzione PRE5ET (descritta, in seguito, nel capitolo): 
con l'uso ripetuto di questa istruzione, pixel della finestra sele- 
zionata assumono il nuovo colore di background. 

3. Visualizzare un testo: la parte del video, nella quale il testo viene 
visualizzato, assume i nuovi colori di background e di foreground. 



Esempi 



SE l'utente imposta... 


ALLORA. . . 


COLOR 0,1 Eli 


la finestra attuale ha il bianco come colore 




di background e il nero come colore di 




foreground 


COLOR %A,0,1 bJ 


come sopra, ma l'istruzione COLOR opera sulla 
| finestra identificata dalla variabile A. 



Note 

Se l'utente imposta COLOR 0.1 invece di COLOR 0,1, i successivi caratteri 
impostati non risultano visibili (dato che 0.1 viene arrotondato a 0). 
Per far nuovamente visualizzare i caratteri, l'utente deve impostare 
CLEAR oppure l'istruzione COLOR predetta in modo corretto. 
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CLS (PROGRAMMA/ IMMEDIATO) 



Cancella il contenuto di una finestra selezionata o della finestra 
attuale e la colora con il colore di background. 




Figura 14-9 Istruzione 


CLS 


Dove 






ELEMENTO DI SINTASSI 




SIGNIFICATO 


window number 




è una espressione numerica arrotondata all'inte 



expression ro più vicino, il cui valore identifica la 

finestra su cui operare. L'uso di questo 
parametro è opzionale. 

Se non viene specificato, l'operazione viene 
eseguita sulla finestra attuale. 



SISTEMI DI COORDINATE 

L'istruzione SCALE consente di scegliere il sistema di coordinate utente 
più idoneo al problema in esame, definendo la trasformazione tra il 
sistema di coordinate di default e il sistema di coordinate prescelto. 

11 sistema di coordinate di default è il sistema di coordinate "hardware" 
(in pixel) solo se il video non è stato suddiviso in finestre ed è stata 
scelta la modalità di visualizzazione 512 x 256 (cioè 64 colonne x 16 
linee), oppure se si è in ambiente PCOS. 
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In tutti gli atri casi il sistema di coordinate di default è pur sempre 
un sistema di coordinate utente, nel senso che la finestra viene 
automaticamente suddivisa in 512 unità lungo l'asse delle x e in 256 
unità lungo l'asse delle y e che l'origine degli assi è nell'angolo 
inferiore sinistro della finestra. 



Si ricordi che, operando con un sistema di coordinate hardware, è pos- 
sibile individuare un pixel specificando le sue coordinate; operando in- 
vece con un sistema di coordinate utente è possibile soltanto individuare 
il pixel che è il più vicino alle coordinate specificate. 

Le funzioni SCALEX e SCALEY permettono di ottenere le coordinate hardware 
di un punto qualsiasi del video. 

I valore di ritorno di SCALEX esprime la misura in pixel del segmento 
lungo l'asse x, compreso tra l'origine della finestra attuale (angolo in 
basso a sinistra) e il punto specificato. 

II valore di ritorno di SCALEY esprime la misura in pixel del segmento 
lungo l'asse y, compreso tra l'origine della finestra attuale (angolo in 
basso a sinistra) e il punto specificato. 

L'utilizzo delle funzioni SCALEX e SCALEY può essere utile in vari casi. 
Per esempio è possibile, tramite l'istruzione SCALE e le funzioni SCALEX 
e SCALEY, individuare in modo esatto un singolo pixel anche se si opera 
con un sistema di coordinate utente (cioè se si opera su una finestra che 
non coincida con l'intero video o sull'intero video con modalità di 
visualizzazione 480 x 256). Per far ciò è sufficiente operare la 
trasformazione di coordinate: 



SCALE 0,SCALEX(511 ) ,0,SCALEY(255) 

Dopo questa trasformazione infatti qualsiasi valore intero compreso tra 0 
e SCALEX ( 51 1 ) individua l'ascissa di un pixel e qualsiasi valore intero 
tra 0 e SCALEY(255) individua l'ordinata di un pixel della finestra 
attuale. 

Un altro utilizzo tipico delle funzioni SCALEX e SCALEY si ha con il 
comando LABEL del PCOS (richiamabile da BASIC tramite una istruzione CALL 
o EXEC) . 11 comando LABEL richiede infatti di esprimere i parametri x-pos 
e y-pos in coordinate hardware e quindi di usare SCALEX e SCALEY se si 
sta operando con coordinate utente. 
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SCALE (PROGRAMMA/ IMMEDIATO) 



Consente di scegliere il sistema di coordinate utente più opportuno, de- 
finendo la trasformazione tra il sistema di coordinate di default e il 
sistema di coordinate prescelto. 




Figura 14-10 Istruzione SCALE 



Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


window number 


è una espressione numerica, arrotondata all'in- 


expression 


tero più vicino, il cui valore identifica la 




finestra su cui operare. Se omesso, il sistema 




opera sulla finestra attuale. 


x0,x1 ,y0,y1 


dimensioni della finestra: (in coordinate uten- 




te) 




x0: ascissa del lato sinistro della finestra 




(cioè x minimo) 




x1 : ascissa del lato destro della finestra (cioè 




x massimo) 



► 
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y0: ordinata del lato inferiore della finestra 
(cioè y minimo) 

y1 : ordinata del lato superiore della finestra 
(cioè y massimo) 

Nota : x1-x0, y1-y0 possono essere sia positive 
che negative, ma non devono mai essere uguali a 
zero. 



Caratteristiche 



Dopo che è stata eseguita un'istruzione SCALE, ogni volta che si deve 
esprimere un valore di una coordinata, detto valore va impostato in 
coordinate utente. 

11 sistema di coordinate è invece quello di default se: 

- nessuna istruzione SCALE è stata eseguita, oppure 

- è stata eseguita l'istruzione: 
SCALE 0,511,0,255 

Il sistema di coordinate utente scelto con l'istruzione SCALE resta 
valido finché: 

- non viene eseguita un'altra istruzione SCALE, oppure 





- non si esce dall'ambiente BASIC. 
Esempi (Video a 4 colori) 






SE l'utente imposta... 


ALLORA... 




COLOR=3,0,1 ,5 BH 
CLS EOI 

LINE(0,0)-(51 1 ,255) Bl 


l'istruzione LINE (descritta in 
seguito) traccia una linea nera 
su sfondo cyan dal punto di co- 
ordinate (0,0) al punto di co- 
ordinate (511,255). 

La linea è indicata nella Figu- 
ra 14-11. 
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SCALE -1000,1000,-1000,1000 I£l 
LINE (0,0)-(511,255) KJj 



Questa linea è stata tracciata 
usando il sistema di coordinate 
di default, dal momento che nes- 
suna istruzione SCALE è stata e- 
seguita in precedenza. 



Con l'uso dell'istruzione SCALE 
«iene assunto un nuovo sistema di 
coordinate. 

L'esecuzione della medesima i- 
struzione LINE questa volta trac- 
cia una linea diversa (vedere la 
Figura 14-12). 




Figura 14-11 Istruzione LINE 
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Fiaura 14-12 Istruzioni SCALE e LINE 



SCALEX (PROGRAMMA/ IMMEDIATO) 



Trasforma una coordinata utente nella corrispondente coordinata hardware 
sull'asse delle x della finestra attuale. 



11 valore di ritorno della funzione esprime la misura in pixel del 
segmento, lungo l'asse x, compreso tra l'origine della finestra (angolo 
in basso a sinistra) e il punto in esame. 




Figura 14-13 Funzione SCALEX 
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Dove 



ELEMENTO 01 SINTASSI 
coordinate 



SIGNIFICATO 



è la coordinata utente x del punto in esame 
misurata sull'asse delle x della finestra 
attuale 



I SCALEY (PROGRAMMA/ IMMEDIATO) 



Trasforma una coordinata utente nella corrispondente coordinata hardware 
sull'asse delle y della finestra attuale. 

11 valore di ritorno della funzione esprime la misura in pixel del 
segmento lungo l'asse y, compreso tra l'origine della finestra (angolo in 
basso a sinistra) e il punto in esame. 




Figura 14-14 Funzione SCALEY 



Dove 




ELEMENTO DI SINTASSI 


SIGNIFICATO 


coordinate 


è la coordinata utente y del 


punto 


in esame 




misurata lungo l'asse delle y 


della 


finestra 




attuale. 
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VISUALIZZAZIONE DI PUNTI 



Visualizzare un punto con un dato colore è la funzione grafica più 
elementare e l'utente può far questo con le istruzioni P5ET e PRESET. 

L'istruzione P01NT consente invece di conoscere il numero di colore di un 
pixel specificato. 



PSET (PROGRAMMA/ IMMEDIATO) 

Attiva con il colore specificato o con il colore di foreground (della 
finestra specificata o della finestra attuale) il pixel di coordinate 
(x,y) specificate oppure, se si è passati in coordinate utente, il pixel 
più vicino alle coordinate (x,y). 




Figura 14-15 Istruzione PSET 



Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 


window number 
expression 


è un' espressione, arrotondata all'intero più 
vicino, che seleziona la finestra sulla quale 
PSET deve operare. Se omessa, viene selezionata 
la finestra attuale. 


x.y 


sono le coordinate su cui PSET deve operare. Se 
le coordinate x.y individuano un punto al di 
fuori della finestra, PSET non attiverà il 
pixel, a causa del "clipping". 
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colour 



specifica il numero di colore del pixel da 
visualizzare. Se omesso, il colore usato è 
quello di foreground. 



Nota: 11 parametro colojr dell'istruzione P5ET non fa variare i colori di 
foreground e background della finestra specificata. 



PRESET (PROGRAMMA/ IMMEDIATO) 



Attiva con il colore di background (della finestra specificata o della 
finestra attuale) il pixel di coordinate (x,y) specificate, oppure, se si 
è passati in coordinate utente, il pixel più vicino alle coordinate 

(*,y). 



Figura 14-16 Istruzione PRESET 



Dove 


ELEMENTO DI SINTASSI 


SIGNIFICATO 


window number 
expression 


è un'espressione numerica, arrotondata all'inte- 
ro più vicino, che seleziona la finestra sulla 
quale PRESET deve operare. Se omessa, viene 
selezionata la finestra attuale 




sono le coordinate su cui PRESET deve operare. 
Se x,y individuano un punto al di fuori della 
finestra, PRESET non attiverà il pixel, a causa 
del "clipping". 
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P01NT (PROGRAMMA/IMMEDIATO) 



Assegna alla variabile alla sinistra del segno di uguale un numero intero 
che rappresenta il numero di colore del pixel di coordinate (x,y) spe- 
cificate, oppure del pixel più vicino a dette coordinate, se si è passati 
in coordinate utente. Le coordinate (x,y) devono cadere all'interno della 
finestra attuale. 




Figura 14-17 Funzione P01NT 



Dove 



ELEMENTO 01 SINTASSI 


SIGNIFICATO 


colour number variable 


è una variabile, alla quale il sistema assegna 
un intero che può essere 0 oppure 1 per un 
sistema bianco e nero, che può variare da 0 a 3 
per un sistema a 4 colori e da 0 a 7 per un 
sistema a 8 colori. Questo intero è il numero di 
colore del pixel di coordinate (x,y) specifica- 
te, o del pixel più vicino a dette coordinate, 
se si è passati a coordinate utente. 




coordinate del pixel di cui si vuole conoscere 
il numero di colore. 
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Esempi 



VIDEO 


COMMENTI 


10 C1RCLE(50,50),20 


traccia una circonferenza sul video con centro 
nel punto di coordinate (50,50) e raggio 20 


20 P5ET(50,50) 


attiva con il colore di foreground il pixel di 
coordinate (50,50) oppure il pixel più vicino a 
queste coordinate, se si è passati a coordinate 
utente 


30 A%=PO1NT(50,50) 


assegna un valore intero alla variabile A%: 
detto valore è il numero di colore del pixel 
alle coordinate (50,50) o del pixel più vicino a 
queste coordinate 


40 PR1NT A% 


visualizza il contenuto di A% 



VISUALIZZAZIONE DEI CURSORI 

Ogni finestra ha due cursori: uno di testo e uno grafico. 

11 cursore di testo individua la posizione dove verrà visualizzato il 
successivo carattere impostato. 

La posizione del cursore di testo viene espressa in termini di numero di — - 
colonna e numero di riga. 

L'utente ha a disposizione la funzione POS (descritta in seguito) per 
conoscere la posizione del cursore di testo. 

Il cursore grafico può essere visualizzato in ogni posizione desiderata. 
Si noti però che la posizione di questo cursore non varia quando si 
eseguono istruzioni di grafica. 

Con l'uso dell'istruzione CURSOR (descritta in seguito), l'utente può 
visualizzare o no uno dei cursori, può variarne la forma e stabilirne la 
frequenza di lampeggio. 

La forma standard del cursore grafico è un rettangolo di 2 pixel per 2 
pixel. 
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11 cursore di testo ha, invece, come forma standard un segno di 
sottolineatura. La visualizzazione di uno dei cursori è possibile solo 
nella finestra su cui si sta operando; appena l'utente seleziona un'altra 
finestra, il cursore visualizzato nella finestra precedente scompare, ma 
viene memorizzato e ogni volta che l'utente ritorna ad operare su quella 
finestra il cursore riappare con le stesse caratteristiche. 

Si noti che quando il cursore di testo viene abilitato, il cursore 
grafico viene automaticamente disabilitato e viceversa; i due cursori non 
possono essere visualizzati contemporaneamente. 



CURSOR (PROGRAMMA/IMMEDIATO) 



Vi sono due formati sintattici diversi per questa istruzione: CURSOR e 
CURSOR POINT. Specificano, rispettivamente, la posizione e le caratteri- 
stiche del cursore di testo e del cursore grafico. 





-otf ' »f , I * 'ale '( » J > ihape 



Figura 14-18 Istruzione CURSOR 



Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


POINT 


è una parola chiave opzionale. Viene usata se si 
vuole operare sul cursore grafico. Se viene 
omessa, le operazioni vengono eseguite sul 
cursore di testo 
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x.y 



on-of f 



specificano dove il cursore deve essere posizio- 
nato; se si opera sul cursore di testo x e y 
rappresentano rispettivamente la posizione di 
colonna e di riga . Se. invece, si opera sul 
cursore grafico, x e y rappresentano le coordi- 
nate di un punto sul video dove il cursore viene 
posizionato (ed esattamente le coordinate del- 
l'angolo in basso a sinistra dell'area rettango- 
lare rappresentatne la Bit-Map del cursore - 
vedere parametro "shape"). 



stabilisce se visualizzare o no il cursore: 



0= non visualizzare 



1= visualizzare 



shape 



stabilisce se il cursore deve lampeggiare e in 
caso affermativo la frequenza di lampeggio: 

0= non lampeggia 

1-20= frequenza di lampeggi 



è un parametro opzionale. Permette di variare la 
forma del cursore. E' il primo elemento di una 
matrice intera unidimensionale a sei elementi 
definita dall'utente. 



Gli elementi di questa matrice (vedere Tabel- 
la 14-2 danno la Bit-Map voluta del cursore che, 
sia per il cursore di testo che per il cursore 
grafico, è un rettangolo di 8 pixel (base) per 
12 pixel (altezza) . 

Ogni bit della Bit-Map del cursore rappresenta 
un pixel. 11 contenuto della Bit-Map del cursore 
viene messo in XOR con il contenuto di quella 
parte della Bit-Map del video che rappresenta 
l'area occupata dal cursore. 
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Esempi 



SE l 'utente inposta. . . 


ALLORA... 


CURSOR POINT(80,30): 
A$=1NPUT$(1) lil 


il cursore grafico viene posiziona- 
to nel punto di coordinate (80,30) 

L'istruzione A$=1NPUT$(1) è stata 
impostata affinchè il cursore ri- 
manga nella posizione specificata 
fino a quando l'utente non imposta 
un carattere da tastiera. 


CURSOR PO1NT(50,50)1 : 
A$=1NPUT$(1) Bl 


il cursore grafico viene posiziona- 
to nel punto di coordinate (50,50) 
e viene visualizzato 


CURSOR PO1NT(50, 50)1,1: 
A$=1NPUT$(1) ■£! 


il cursore grafico viene posiziona- 
to nel punto di coordinate (50,50), 
viene visualizzato e ha una fre- 
quenza di lampeggio pari ad uno. 


CURSOR (32,8)1 :AS=INPUT$(1) EAM 


il cursore di testo viene posizio- 
nato alla colonna 32 della riga 8; 
viene visualizzato e non lampeggia. 


CURSOR (32,8)1 ,0,A%(1): 
A$=1NPUT$(1) fSM 


come sopra, con l'unica differenza 
che la forma del cursore è stata 
definita dall'utente (una freccia 
rivolta verso l'alto) 
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BIT MAP 


ELEMENTO 


DECIMALE 


ESADECIMALE 


00010000 
00111000 


A%(1) 


4152 


&H1038 


01111100 
11111110 


A%(2) 


31998 


&H7CFE 


00111000 
00111000 


A%(3) 


14392 


&H3838 


00111000 
00111000 


A%(4) 


14392 


&H3838 


(lai i <i dilli 
00111000 

00111000 


ft%(5) 


14392 


&H3838 


00111000 
00111000 


A%(6) 


14392 


&H3838 



Tabella 14-2 La Bit Map del Cursore 

Nota : Si ricordi che ogni elemento della matrice intera contiene sedici 
bit. 



POS (PROGRAMMA/ IMMEDIATO) 

Dà la posizione del cursore di testo nella finestra attuale. 




Figura 14-19 Istruzione POS 
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Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


variable 


è una variabile numerica, alla quale il sistema 
assegna un valore intero. Questo valore fornisce 
o la posizione di riga o la posizione di colonna 
del cursore di testo (vedere il parametro 
coordinate attribute qui di seguito) 


coordinate attribute 


specifica se nella variabile deve ritornare il 
valore relativo alla posizione di riga o alla 
posizione di colonna. 

0 = posizione di colonna 
<>0 = posizione di riga. 



COME TRACCIARE F IGURE 

La grafica dell'M20 comprende istruzioni che permettono all'utente di 
tracciare linee e rettangoli (istruzione LINE), circonferenze (istruzione 
CIRCLE) e figure qualsiasi (istruzione DRAW) e di colorare l'area 
racchiusa da una figura chiusa (istruzione PAINT). 
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LINE (PROGRAMMA/IMMEDIATO) 



Traccia una linea o un rettangolo in- un determinato colore. L'utente ha 
la facoltà di colorare la superficie del rettangolo. 




Figura 14-20 Istruzione LINE 
Dove 



ELEMENTO DI SINTASSI 




SIGNIFICATO 


window number 
expression 




è un'espressione numerica intera, che individua 
e seleziona la finestra sulla quale l'istruzione 
LINE deve operare. Se omessa, l'istruzione LINE 
opera sulla finestra attuale. 


STEP 


è una parola chiave opzionale. Consente l'uso di 



coordinate relative. Con l'uso di STEP le 
coordinate (x^,y ) (coordinate iniziali) diven- 
gono relative all'ultimo punto tracciato o (in 
assenza di questo) all'angolo inferiore sinistro 
della finestra. Le coordinate ^*2'^2^ ' co ~ 
ordinate finali) divengono, invece, relative al 
punto d'inizio della linea (o del rettangolo) 



14-36 



LINGUAGGIO BASIC - MANUALE GENERALE 



GRAFICA 



V y 2 
colour 



B (Box) 



F (Filled) 



action verb 



sono le coordinate del punto iniziale della 
linea. Se omesse, la linea inizia dall'ultimo 
punto tracciato o, in assenza di questo, 
dall'angolo inferiore sinistro della finestra. 



sono le coordinate del punto finale della linea 



un numero di colore, che individua il colore con 
il quale deve essere tracciata la linea o il 
rettangolo. Il valore di default è il colore di 
foreground della finestra attuale. 

è un parametro opzionale, con l'uso del quale è 
possibile tracciare un rettangolo. Il rettangolo 
(con i lati paralleli ai bordi della finestra) 
ha come diagonale, il segmento di coordinate (x 



y,) e (x 2 ,y 2 ) 



è un parametro opzionale, da usare solo con il 
parametro B. 'BF' traccia un rettangolo, la cui 
superficie viene colorata con il colore specifi- 
cato nel parametro colour, o con il colore di 
foreground. 



è un parametro opzionale, che può assumere i 
seguenti valori: ANO, XOR, OR, NOT, PSET, 
PRE5ET. L'opzione PSET fa in modo che la linea o 
il rettangolo vengano tracciati nel colore 
indicato. Le opzioni AND, OR e XOR indicano che 
il colore con cui tracciare la linea o il 
rettangolo è il risultato della corrispondente 
operazione logica fra il numero di colore della 
linea o del rettangolo e il numero di colore dei 
pixel già presenti su video. Questa operazione 
viene ripetuta per ogni punto della linea o del 
rettangolo. 

L'opzione NOT indica che il colore della linea o 
del rettangolo è il complemento del numero di 
colore dei pixel già presenti su video. Con 
l'operazione PRESET la linea o il rettangolo 
vengono tracciati con il colore di background 
della finestra selezionata. Il valore di default 
del parametro action verb è PSET. 
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Esempio (Video a 4 colori) 



VIDEO 


COMMENTI 


10 C0L0R=4,2,4,5 


questo programma disegna su un colore 


di 


20 CLS 


background rosso un triangolo isoscele 


di 


30 L1NE(206,100)-(306,100) 


colore blu (v. Figura 14-21). 




40 L1NE(256,200) 






50 LINE STEP(-50,-100) 


L'istruzione PAINT viene descritta 


nel 


60 PA1NT(256,150) 


seguito. 






Figura 14-21 Disegno di un triangolo 



Nota 



Se i parametri specificati per tracciare una linea o un rettangolo sono 
tali che una parte della linea o del rettangolo cade al di fuori dei 
confini della finestra, solo la parte interna alla finestra viene 
visualizzata e la parte esterna viene ignorata ("clipped"). 
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C1RCLE (PROGRAMMA/IMMEDIATO 



Traccia una circonferenza in un dato colore, specificando le coordinate 
del centro e il raggio. 






X 


aipect 






ratio 





Figura 14-22 Istruzione C1RCLE 



Dove 



ELEMENTO DI SINTASSI 



window number 
expression 



colour 



SIGNIFICATO 



è un'espressione numerica, arrotondata all'inte- 
ro più vicino, che seleziona la finestra sulla 
quale l'istruzione C1RCLE deve operare. Se 
omessa, viene selezionata la finestra attuale. 

sono le coordinate del centro della circon- 
ferenza 

è il raggio della circonferenza 



è un numero di colore che individua il colore 
con cui disegnare la circonferenza. 11 valore di 
default è il colore di foreground della finestra 
selezionata 
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aspect ratio 



action verb 



a causa della diversa densità dei pixel su video 
lungo l'asse x e l'asse y, l'utente può 
specificare un valore (numero reale positivo) di 
questo parametro, al fine di poter tracciare un 
cerchio collegando all'M20 un video diverso da 
quello standard. 11 parametro è opzionale. 11 
valore di default è 0.807 e dà luogo ad una 
circonferenza con un video M20 standard. 

è un parametro opzionale. Può assumere uno dei 
valori seguenti: AND, XOR, OR, NOT, PSET, 
PRESET. Ognuna di queste opzioni definisce 
l'operazione da eseguire su ogni punto della 
ci rconf erenza . 



L'opzione PSET traccia la circonferenza nel 
colore indicato. 



Le operazioni AND, OR e XOR indicano che il 
colore con cui tracciare la circonferenza è il 
risultato della corrispondente operazione logica 
fra il colore indicato o assunto per default e 
quello dei pixel già presenti su video. 

L'operazione NOT indica che il colore della 
circonferenza è il complemento del colore dei 
pixel già presenti su video. Con l'opzione 
PRESET la circonferenza viene tracciata con il 
colore di background della finestra selezionata. 
11 valore di default del parametro action verb è 
PSET. 



Nota 

Quando si usa una istruzione SCALE, il parametro aspect ratio non viene 
modificato e il parametro r viene determinato in funzione dell'unità di 
misura sull'asse delle x. 
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Esempio (Video a 4 colori) 





VIDEO 


COMMENTI 




10 COLOR=2,4,5,0 
20 CLS 

30 C1RCLE(100,120),90 
40 CIRCLE(150,130),120 
50 C1RCLE(250,120),100 
60 PA1NT(180,120) 


11 program-:, disegna tre cerchi che 
si intersecano. 11 colore di fondo è 
il blu, quello delle circonferenze è 
il colore di foreground (rosso) e 
l'area comune ai tre cerchi viene 
colorata (tramite la PAINT) sempre 
con il colore di foreground. (Vedere 
Figura 14-23). 



L'istruzione PAINT viene descritta 
nel seguito. 




Figura 14-23 Cerchi che si intersecano 
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DRAW (PROGRAMMA/IMMEDIATO) 



11 video può essere pensato come un foglio di carta sul quale poter far 
scorrere una ipotetica penna chiamata penna virtuale ("virtual pen"). 
Questa penna può essere spostata dall'utente in qualsiasi posizione del 
video e, nel far questo, può disegnare (pen down) oppure no (pen up). 

L'istruzione DRAW sposta la penna virtuale in qualsiasi posizione 
all'interno di una finestra e può tracciare linee di un colore 
specificato. 







— * 


window 
number 
expression 






comma nd 




string 



Figura 14-24 Istruzione DRAW 



Dove 



ELEMENTO 01 SINTASSI 



window number 
expression 



command string 



SIGNIFICATO 



è un'espressione numerica intera, che 
individua e seleziona la finestra, 
sulla quale DRAW deve operare. 11 
valore di default è la finestra 
attuale. 



può essere o una variabile stringa o 
una costante stringa. In entrambi i 
casi, la stringa è formata da uno o 
più comandi (elencati nella tabella 
Comandi); questi comandi controllano 
il movimento della "penna virtuale". 

Tutti i comandi, ad eccezione del 
comando C, possono essere preceduti 
dall'opzione B, che impedisce di 
disegnare su video (e quindi ha la 
funzione di "pen up") e possono 
essere seguiti da una de'.le seguenti 
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opzioni: AND, XOR, OR, NOT, PSET, 
PRESET. Ognuna di queste opzioni 
individua la corrispondente operazio- 
ne, che viene eseguita su ciascun 
punto della linea. Queste opzioni 
vengono specificate con la prima 
lettera del nome; unica eccezione, 
l'opzione PRESET, che viene specifi- 
cata con la lettera R. 



L'opzione P (cioè PSET) traccia la 
figura nel colore indicato. Le opzio- 
ni A (cioè AND) , 0 (cioè OR), e X 
(cioè XOR) indicano che il colore 
della figura è il risultato di 
un'operazione logica fra il colore 
indicato e il contenuto precedente 
del video. 

L'opzione N (cioè NOT) indica che il 
colore della figura è il complemento 
del contenuto del video. 



L'opzione R (cioè PRESET) traccia la 
figura nel colore di background. 




11 valore di default è P. 



Nota : 1 parametri dei comandi (dx,dy,x,y e colour) possono essere 
. — espressi come variabili. In questo caso, i nomi delle variabili devono 

essere scritti fra segni di uguale. Vedere gli esempi qui di seguito. 



Comandi 



COMANDO 



M dx.dy 



SIGNIFICATO 



sposta la penna dalla posizione 
attuale (diciamo a,b) alla posizione 
indicata da (a+dx,b+dy). 



J x,y 



sposta la penna nella posizione 
indicata da (x,y). 
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U dy 



sposta la penna in alto di dy 
posizioni . 



D dy 



L dx 



sposta la penna in basso di dy 
posizioni. 



sposta la penna a sinistra di dx 
posizioni . 



R dx 



C colour 



sposta la penna a destra di dx 
posizioni . 



stabilisce il colore con cui traccia- 
re le linee. 



Dopo l'opzione C deve essere specifi- 
cato un numero di colore. 



Se l'opzione C non viene specificata, 
viene assunto l'ultimo colore usato 
in una precedente istruzione DRAW 
oppure il colore di foreground della 
finestra attuale. 



Esempi 



VIDEO 

90 PSET(10,20) 
100 X=23 

130 DRAU "M=X=,25" 



COMMENTI 

l'istruzione 90 attiva il punto 
(10,20) con il colore di foreground. 

L'istruzione 100 pone X=23 

L'istruzione 130 traccia una linea 
dalla posizione attuale della penna 
(10,20) alla posizione (33,45), cioè 
(10+23,20+25) 
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250 AS="BM 10,2 
0 20 MR 15,-3" 



l'istruzione 250 assegna alla varia- 
bile A$ la seguente stringa di 
comandi : 



- il comando M con l'opzione B per 
spostare la penna senza disegnare 
("pen up") dalla sua posizione 
attuale (diciamo a,b) alla posizio- 
ne (a+10,b+2). 

- il comando D per spostare la penna 
in basso di 20 posizioni cioè fino 
al punto (a+l0,b-18) 

- il comando M per spostare la penna 
dalla sua posizione attuale (a+10, 
b-18) al punto (a+25,b-21). 



260 DRAW AS 



L'opzione R (PRESET) indica che la 
linea deve essere tracciata nel 
colore di background. 



l'istruzione 260 esegue la sequenza 
dei comandi, specificati nella varia- 
bile A$. 



Nota 



La sequenza di comandi in una istruzione DRAW può essere impostata sia in 
lettere minuscole che in lettere maiuscole. 1 comandi possono essere 
separati l'uno dall'altro da spazi, ma possono anche essere contigui. 
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Esempio (Sistema a 8 colori) 



VIDEO 



10 CLS 

20 DRAM "bj0,0" 
30 X=511 :Y=255 
40 K=0 

50 FOR 1=1 TO 23 

60 GOSUB 170 

70 DRAU "u=y=":Y=Y-5 

80 GOSUB 170 

90 DRAU "r=x=":X=X-10 

100 GOSUB 170 

110 DRAU "d=y=":Y=Y-5 

120 GOSUB 170 

130 DRAU "I=x=":X=X-10 

140 NEXT 

150 AS=1NPUT$(1) 
160 END 

170 C0L=(K MOD 7)+1 
180 K=K+1 :DRAU "c=col=" 



COMMENTI 



RETURN 



11 programma disegna una spezzata 
partendo dal punto di coordinate 
0,0 (vedi istruzione 20). 

Detto punto si trova nell'angolo 
inferiore sinistro del video, dato 
che non è stata usata un'istruzione 
SCALE. 

La subroutine alle linee 170 e 180 
consente di cambiare il colore 
della linea da disegnare (sceglien- 
do un numero di colore tra 1 e 7 - 
escludendo quindi il nero, che è il 
colore di background). Questa sub- 
routine viene attivata -ogni volta 
che viene tracciata una linea. 

La prima istruzione dalla linea 70 
traccia una linea verso l'alto di Y 
unità e la seconda istruzione 
decrementa il valore di Y di 5 
unità. 



La prima istruzione alla linea 90 
traccia una linea verso destra di X 
unità e la seconda istruzione 
decrementa il valore di X di 10 
unità. 



La prima istruzione alla linea 110 
traccia una linea verso il basso di 
Y unità e la seconda istruzione 
decrementa il valore di Y di 5 
unità . 

La prima istruzione alla linea 130 
traccia una linea verso sinistra di 



14-46 



LINGUAGGIO BASIC - MANUALE GENERALE 



GRAFICA 



X unità e la seconda istruzione 
decrementa il valore di X di 10 
unità. 

11 numero di linee da tracciare 
viene controllato da un loop con 
una variabile di controllo 1 che va 
da 1 a 23. Questo loop consente 
quindi di tracciare una spezzata di 
23 x 4 = 92 segmenti, ognuno di 
colore diverso (vedere Figura 
14-25). 




Figura 14-25 
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PAINT (PROGRAMMA/IMMEDIATO) 

Colora l'intera finestra o una sua porzione purché delimitata da un con- 
torno chiuso di un dato colore oppure del colore di foreground. 11 siste- 
ma inizia a colorare dal pixel di coordinate (x,y) specificate, oppure, 
se si è passati in coordinate utente, dal pixel più vicino alle 
coordinate (x,y). 




Figura 14-26 Istruzione PAINT 



Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


window number 
expression 


è un'espressione numerica il cui valore, arro- 
tondato all'intero più vicino, seleziona la 
finestra sulla quale l'istruzione PAINT deve 
operare. 5e questo parametro è omesso viene 
selezionata la finestra attuale. 


x.y 


sono le coordinate del punto dal quale il 
sistema inizia a colorare 


colour 


è un numero di colore che specifica come 
colorare la finestra o una sua porzione, 
delimitata da un contorno chiuso, li valore di 
default è il colore di foreground 



► n 
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bcolour 


è un numero di 


colore, che 


specifica 


il colore 




del bordo 


che 


delimita 


la 


figura 


da 


colorare. 




11 valore 


di default è il 


colore di 


foreground. 



Nota 

Per colorare una figura delimitata da un contorno chiuso, l'utente si 
assicuri che le coordinate x e y cadano all'interno della figura. Se 
vengono a trovarsi al di fuori del bordo della figura, il sistema colora 
soltanto la parte di finestra esterna alla figura medesima. 

Per poter utilizzare in modo adeguato l'istruzione PAINT, il bordo della 
figura deve essere tutto di uno stesso colore (quello specificato dal 
parametro bcolour, oppure il colore di foreground se detto parametro è 
omesso). Per esempio, se si vuole colorare una corona circolare, le due 
circonferenze che la delimitono devono essere dello stesso colore. 

Se invece i colori delle due circonferenze sono diversi e: 

- il colore specificato dal parametro bcolour è quello della circonferen- 
za esterna, la PAINT colora tutto il cerchio delimitato dalla circon- 
ferenza esterna; 

- il colore specificato dal parametro bcolour è quello della circonferen- 
za interna, la PAINT colora tutta l'area esterna alla circonferenza in- 
terna, fino ai limiti della finestra o fino a incontrare un contorno 
dello stesso colore della circonferenza interna. 
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Esempio (Video a 4 colori) 



V1DFD 



10 COLOR=2,5,4,0 
20 CLS 

30 C1RCLE(256,128),130,2 

40 PAINT(256,128),1,2 

50 L1NE(251,123)-STEP(10,1 



),),3,BF 



COMMENTI 



L'istruzione 10 seleziona quattro 
tra gli otto colori disponibili. 
L'istruzione 20 cancella il con- 
tenuto del video e lo colora con il 
colore di background (in questo caso 
il blu). L'istruzione 30 traccia una 
circonferenza con un raggio di 130 
il cui centro è un punto di coordi- 
nate (256,128) e colora la circonfe- 
renza di rosso. L'istruzione 40 
colora il cerchio di giallo. L'i- 
struzione 50 disegna un rettangolo 
nero al centro del cerchio (v. 
Figura 14-27) 
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GRAFICA 



Esempio (Video a 8 colori) 



VIDEO 



10 CLS 

20 FOR 1=1 TO 7 
30 COLOR 1,0 

40 C1RCLE(256, 128), 110-1*10 
50 C1RCLE (256,128),110-(I-1)*10 
60 PAINT (256-110-(l-.5)*10,128) 
70 NEXT 



COMMENTI 



Questo programma traccia 7 corone 
circolari concentriche. 11 centro 
è nel punto (256,128), cioè coinci- 
de con il centro del video. 

11 colore di background è il nero 
(dato che il secondo parametro 
dell'istruzione COLOR alla linea 30 
è 0) e il colore di foreground 
cambia al variare della variabile 
di controllo 1, da 1 (verde) a 7 
(bianco) . 



Le corone circolari vengono colora- 
te tramite l'istruzione PAINT (alla 
linea 60). Le coordinate del punto 
dal quale il sistema inizia a 
colorare sono state scelte in modo 
che il punto stesso cada sempre 
lungo la parallela all'asse x 
passante per il centro, ed è 
l'estremo del raggio medio della 
corona. 



Il colore della corona e quello dei 
cerchi che la delimitano non sono 
specificati nell'istruzione PAINT, 
quindi, per default, coincidono con 
il colore attuale di foreground. 



Vedere Figura 14-8 
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r'igura 14-28 Corone concentriche 



COME MEMORIZZARE E VISUALIZZARE FINESTRE E RETTANGOLI 

L'utente può memorizzare in una matrice intera unidimensionale il conte- 
nuto di una finestra o di un'area rettangolare all'interno di una fine- 
stra, con l'uso dell'istruzione GET, oppure con l'istruzione PUT può 
trasferire su «ideo l'immagine di un'area rettangolare, precedentemente 
memorizzata in una matrice intera unidimensionale. 



GET - Grafica (PROGRAMMA/IMMEDIATO) 

Memorizza un'intera finestra o un qualsiasi rettangolo all'interno di una 
finestra in una matrice unidimensionale ad elementi interi (16 bit per 
elemento) . 
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GRAFICA 





Figura 14-29 Istruzione GET - Grafica 



Dove 



ELEMENTO DI SINTASSI 

window number 
expression 



V y 2 



array element 



SIGNIFICATO 



è un'espressione numerica, arrotondata all'inte- 
ro più vicino, che seleziona la finestra sulla 
quale GET deve operare. 11 valore di default è 
la finestra attuale. 



sono le coordinate che definiscono la diagonale 
del rettangolo da memorizzare 



il primo elemento utilizzabile della matrice 
unidimensionale, usata nell'istruzione GET. 
11 sistema utilizza gli elementi della matrice 
nel nodo seguente: 



- il primo elemento 
rettangolo; 



contiene la base del 



- il secondo contiene l'altezza; 

- il valore del terzo elemento stabilisce se 
l'immagine da memorizzare è in bianco e nero o 
a colori. 

1 successivi elementi della matrice (ciascuno 
atto a contenere 16 bit) contengono i bit di 
quella sezione della Bit Map del video che 
corrisponde al rettangolo considerato. 
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L'utente deve dimensionare la matrice unidimen- 
sionale, usando l'istruzione D1M. La formula se- 
guente permette di calcolare il numero minimo di 
elementi della matrice: 



(( 



^1 x altezza)xDT)+3 
lo | 



dove: 

base e altezza sono espresse in pixel 

DT = 1 con un video bianco e nero 

DT = 2 con un video a 4 colori 

DT = 3 con un video a 8 colori 

1 significa prendere 1' intero >= (sempre ar- 
rotondato verso l'alto) 



PUT - Grafica (PROGRAMMA/ IMMEDIATO) 




Visualizza un'immagine, precedentemente memorizzata con l'uso dell'i- 
struzione GET in una matrice unidimensionale ad elementi interi (16 bit 
per elemento). 
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GRAFICA 



Dove 



ELEMENTO DI SINTASSI 


SIGNIFICATO 


window number 
expression 


è un'espressione numerica intera, che individua 
e seleziona la finestra sulla quale deve operare 
l'istruzione PUT. 11 valore di default è la 
finestra attuale. 


V y z 


sono le coordinate che definiscono la diagonale 
del rettangolo memorizzato nella matrice unidi- 
mensionale, rettangolo il cui contenuto deve es- 
sere portato su video. Se la diagonale definita 
uo qucbic cuufuinaic ìnuiviuud su viueo un ret- 
tangolo di dimensioni diverse da quello memoriz- 
zato nella matrice, viene visualizzato il 
rettangolo minore. 

Se le coordinate x^ e y^ sono omesse, il ret- 
tangolo memorizzato viene visualizzato a partire 
dal punto x e y (vertice superiore a sini- 
stra). 


array element 


è il primo elemento della matrice unidimensiona- 
le, che contiene l'informazione memorizzata con 
una istruzione GET. 


action verb 


è un parametro opzionale, che può assumere 1 
seguenti valori: AND, XOR, OR, NOT, PSET, 
PRESET. Ognuna di queste opzioni definisce 
l'operazione corrispondente, da eseguire su ogni 
pixel contenuto all'interno dell'area rettan- 
golare. 

L'opzione PSET indica che il rettangolo visua- 
lizzato è, semplicemente, quello memorizzato 
nella matrice. 



Le operazioni AND, OR e XOR stanno invece ad 
indicare che il rettangolo visualizzato è il 
risultato di un'operazione logica fra i numeri 
di colore dei pixel contenuti nella matrice e i 
numeri di colore dei pixel preecistenti in 
quell'area rettangolare di video. 
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L'opzione NOT indica che sarà fatto il 
complemento dei numeri di colore dei pixel 
presenti su video. L'opzione PRESET, invece, 
indica che sarà fatto il complemento dei numeri 
di colore dei pixel contenuti nella matrice. 

11 valore di default del parametro action verb è 
PSET. 



Esempio (Video a 4 colori) 



VIDEO 



COMMENTI 



1 COLOR=2,4,5,0 

5 D1M B%(2000) 
10 CLS:CIRCLE(256,128),80,3 
20 LINE (190, 60)- (350,1 95) ,,BF,X0R 
30 GET(190,60)-(360,128),B%(0) 
50 CLS:PUT(250,220),B%(0) 



L'istruzione 5 dimensiona la ma- 
trice da usare per memorizzare le 
scanline del rettangolo. 

La linea 10 cancella quanto conte- 
nuto su video, lo colora con il co- 
lore di background (blu) e traccia 
una circonferenza di colore nero. 



L'istruzione 20 traccia un rettan- 
golo sovrapposto al cerchio (vedere 
la Figura 14-31) e lo colora di 
rosse. Infatti l'operazione di XOR 
tra 0 (blu), il nume. o di colore di 
background, e 1 (rosso), il numero 
di colore di foreground, è 1 (ros- 
so). La parte della circonferenza 
all'interno del rettangolo viene 
colorata in giallo. Infatti l'ope- 
razione di XOR tra il numero di 
colore 3 e il numero di colore di 
foreground 1, dà il numero di colo- 
re 2. 



L'istruzione 30 memorizza una parte 
di video nella matrice B%. 

La linea 50 cancella quanto con- 
tenuto su video e visualizza l'area 
rettangolare precedentemente memo- 
rizzata (vedere la Figura 14-32). 
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PRESTAZIONI GRAFICHE FORNITE DAL PCOS 



Il PCOS permette all'utente di scegliere la modalità di visualizzazione 
(256 x 512 o 256 x 480 pixel) tramite il comando SSYS e di preallocare 
spazio in memoria per un certo numero di finestre tramite il comando 
SBASIC. (11 PCOS non consente però di aprire, chiudere o selezionare 
finestre; queste operazioni possono essere fatte solo in BASIC o in 
ASSEMBLER) . 

Inoltre i comandi LABEL, SPRINT, LSCREEN, RFONT e WFONT del PCOS, e i 
parametri +cc e -ce consentono di realizzare alcune importanti funzioni 
di grafica: 

- 11 comando LABEL visualizza, con il colore specificato, stringhe di 
caratteri di dimensione e orientamento variabili nell'ambito dell'inte- 
ro video o di una data finestra (se richiamato da BASIC); 

- Il comando SPRINT riproduce in stampa l'immagine dell'intero video o di 
una data finestra (se richiamato da BASIC); 

- Il comando LSCREEN riproduce in stampa tutti i caratteri presenti 
sull'intero video o in una finestra (se richiamato da BASIC); 

- 1 comandi RFONT e WFONT (unitamente al Video File Editor) consentono di 
creare font di caratteri definiti dall'utente; 

- 1 parametri +cc e -ce consentono di visualizzare i primi 32 caratteri 
della tabella ASCII (codici esadecimali da 00 a 1F). 

Per maggiori dettagli sull'uso di questi comandi e di questi parametri, 
vedere il "Professional Computer Operating System (PCOS) - Guida Utente". 
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A. CODICI ASCII 



La tabella seguente rappresenta in codice decimale, esadecimale e 
binario i caratteri ASCI 1 . 
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a Decimale 

b Esadecimale 

c Binano (8 bit) 

d Caratteri ASCII 



Nota: 1 caratteri all'interno del quadrato variano a seconda del set 
nazionale di tastiera adottato (vedi Appendice B). 
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B. EQUIVALENZE DEI CARATTERI 
IN CODICE ASCII 



EQUIVALENZE DEI CARATTERI IN CODICE ASCII 



CODICE 
ASCI I 
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• I caratteri compresi in un cerchio sono usati per funzioni in linguaggio BASIC 
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C. CODICI D'ERRORE E SIGNIFICATO 



SOMMARIO 

Questa appendice riporta tutti gli errori del BASIC e del PCOS. 

In caso d'errore in ambiente BASIC viene visualizzato solo il messaggio 
senza il codice corrispondente. 

In caso d'errore in ambiente PCOS viene visualizzato solo il codice senza 
il messaggio corrispondente (a meno che il comando EPR1NT non sia 
residente; in questo caso viene visualizzato anche il messaggio). 



INDICE 



ERRORI PCOS E BASIC C-1 
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ERRORI PCOS E BASIC 



CODICE 


DESCRIZIONE 
(PCOS e/o BASIC) 


COMMENTO 


, 


NEXT without FCR 
(BASIC) 


Una variabile in un'istruzione NEXT non 
corrisponde ad alcuna variabile in una 
istruzione FOR eseguita in precedenza. 


2 


Syntax error 
(BASIC) 


Viene incontrata una linea che contiene 
alcune sequenze non corrette di carat- 
teri (così come parentesi non accoppia- 
te, parole chiave errate, separatori 
errati, ecc.). 


3 


RETURN without GOSUB 
(BASIC) 


Viene incontrata un'istruzione RETURN 
senza una corrispondente istruzione 
GOSUB. 


4 


Out of DATA 
(BASIC) 


Viene eseguita un'istruzione READ quan- 
do non ci sono più istruzioni DATA con 
dati da leggere. 


5 


Il legai function cali 
(BASIC) 


Un argomento fuori del range prescritto 
viene passato ad una funzione numerica 



o stringa. 

Un errore di questo tipo può succedere 
anche quando: 

a. un indice di matrici risulti negati- 
vo o eccezionalmente grande; 

b. una funzione LOG abbia un argomento 
negativo o nullo; 

c. una funzione SQR abbia un argomento 
negativo; 

d. una mantissa negativa abbia un 
esponente non intero; 

e. è stato dato un argomento non cor- 
retto a una delle seguenti funzioni: 
M1DS, LEFTS, R1GHTS, TAB, SPC, 
STRING$, SPACES, INSTR, oppure alla 
funzione ON. . .GOTO. 
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CODICE 



DESCRIZIONE 
(PCOS e/o BASIC) 



Overf low 

(BASIC) 



Out of memory 
(PC0S/BAS1C) 



Undefined line number 
(BASIC) 



Subscript out of range 
(BASIC) 



Duplicate definition 
(BASIC) 



11 Oivision by zero 
(BASIC) 



COMMENTO 



Il risultato di un calcolo è troppo 
grande per essere rappresentato in un 
numero. 

Se si verifica un underflow, il risul- 
tato viene assunto pari a zero e 
l'esecuzione continua. 



In BASIC : un programma è troppo grande, 
ha troppi loop o subroutine, o troppe 
variabili, o espressioni troppo com- 
plesse. 

In PCOS : è stato richiamato un comando 
PCOS o una routine Assembler che non 
può essere allocato/a nella memoria 
disponibile. 

Una istruzione GOTO, GOSUB, ON... GOTO, 
0N...G0SUB, 1F...THEN... ELSE, 1F...- 
GOTO. . .ELSE, o DELETE fa riferimento a 
una linea inesistente. 



E' stato indicato un elemento di 
matrice o con un indice fuori dalle 
dimensioni della matrice, o con un 
numero sbagliato di indici. 



Due o più di due istruzioni DIM fanno 
riferimento alla stessa matrice oppure 
viene eseguita un'istruzione DIM dopo 
che per una data matrice si sono 
assunte le dimensioni di default. 



Viene incontrata una divisione per 
zero, oppure si ha un'elevamento a 
potenza dove il valore della base è 
zero e l'esponente è negativo. In ogni 
caso il risultato è l'infinito di 
macchina: con il segno del numeratore 
per la divisione per zero, con il segno 
positivo nel caso dell'elevamento a 
potenza . 
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CODICI D'ERRORE E SIGNIFICATO 



CODICE 


DESCRIZIONE 
(PCOS e/o BASIC) 


COMMENTO 


12 


Illegal direct 
(BASIC) 


Viene introdotta una istruzione che non 
è legale in Modo Immediato. 


13 


Type mismatch 
(PCOS/BASIC) 


In BASIC: a una variabile numerica 
viene assegnato un valore stringa; a 
una funzione che richiede un parametro 

NU Ilici ILO Vicilc pabba IU UH al yuiiiCH LU 

stringa . 

In PC05: è "stato impostato un valore 
stringa quando è richiesto un valore 
numerico e viceversa. 


14 


fliil" o i etrìnn ^nsrp 

UUl Vi Obi 11 IU 3pO i-C 

(BASIC) 


Variahìlì ^trinnfl hflnnn fatto in mndo 

Va' laull 1 OLI 1 1 Ina Ma l 1 1 i U IQHU l'I lllUUU 

che il BASIC superasse la memoria 
utente disponibile. 11 BASIC alloca lo 

c n a ? i ri rio Ilo ctfinnho in mn rln Hi nani ff\ 
suoi iu uc Ile oLl Illune ili niu uu uiiiaiiiJUUj 

finché non succede un errore di questo 
tipo. 




jiiinu tuo long 
(BASIC) 


q tanf itn Hi ~ — . — — — 1 1 n 9 erri nei ?* nr\ 

ji e LcnLdio ui creare una bir inga t-uii 
più di 255 caratteri. 


16 


String formula too 
complex 

(BASIC) 


Una espressione stringa è troppo lunga 
o troppo complessa. E' opportuno divi- 
derla in più espressioni semplici. 


17 


Can't continue 
(BASIC) 


Si è cercato di riprendere l'esecuzione 
di un programma: 

1. che è stato modificato dopo un 

BEH B; 

2. che non esiste in memoria. 


18 


Undefined function 
(BASIC) 


Viene richiamata una funzione prima 
della corrispondente definizione. 


19 


No RESUMÉ 11 controllo è stato passato a una 
(BASIC) routine di gestione degli errori che 
non contiene una istruzione RESUMÉ. 
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CODICE 


DESCRIZIONE 
(PCOS e/o BASIC) 


COMMENTO 


20 


RESUMÉ without error 
(BASIC) 


Viene incontrata una istruzione RESUMÉ 
prima di entrare in una routine di 
gestione degli errori. 


22 


Missing operand 
(BASIC) 


Una espressione contiene un operatore 
non seguito da operando. 


23 


8uffer overflow 
(BASIC) 


Si è tentato di introdurre una linea 
che ha più di 255 caratteri. 


26 


FOR without NEXT 
(BASIC) 


jSi è incontrata un'istruzione FOR senza 
una corrispondente NEXT. 


29 


UHILE without WEND 
(BASIC) 


Una istruzione UHILE non ha una corri- 
spondente WEND. 


30 


WEND without UHILE 
(BASIC) 


Una istruzione WEND non ha una corri- 
spondente WH1LE. 


31 


IEEE Invalici talker/ 
listener address 
(BASIC) 


Uso illegale di indirizzo di tra- 
smettitore/ricevitore. 


32 


IEEE: talker = listener 
address 

(BASIC) 


Si è tentato di trasmettere a un 
trasmettitore o di ricevere da un 
ricevitore. 


33 


IEEE: Unprintable error 
(BASIC) 


Un messaggio d'errore non è stampabile, 
ossia corrisponde a un codire d'errore 
non definito. 


34 


IEEE: Board not present 
(BASIC) 


Si è tentato di usare il package IEEE 
su una macchina che non ha l'interfac- 
cia IEEE. 


35 


Window not open 
(PCOS/BAS1C) 


Si è cercato di utilizzare una finestra 
non ancora aperta (può succedere anche 
in PCOS, quando si esegue un programma 
Assembler). 


36 


llnable to create window 
(PCOS/BASIC) 


Le dimensioni della finestra da creare 
non sono corrette (può succedere anche 
in PCOS, quando si esegue un programma 
Assembler). 



► 
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CODICI D'ERRORE E SIGNIFICATO 



CODICE 


DESCRIZIONE 
(PCOS e/o BASIC) 


COMMENTO 


37 


Invai id action-verb 
(BASIC) 


lift ^ 1 M t m ti* w M m 

Una clausola Action Vero e stata 
impostata in modo non corretto o non è 
stata usata nel modo giusto. 


38 


Parameter out of range 
(BASIC) 


Uno o più parametri sono andati oltre i 
limiti prescritti. 


39 


Too many dimensions 
(BASIC) 


Si è tentato di usare una matrice a più 
dimensioni nella grafica. 


50 


F1ELD overflow 
(BASIC) 


Una istruzione F1ELD cerca di allocare 
più byte di quelli specificati per la 
lunghezza dei record per un file 
random. 


51 


Internai error 
(BASIC) 


Si è verificata una anomalia interna. 
Segnalare le condizioni d'errore al- 
l'Organizzazione di Assistenza. 


52 


Bad file number 
(BASIC) 


Un'istruzione o un comando fa riferi- 
mento a un file il cui numero non 
appartiene all'intervallo specificato 
ali ' inizializzazione, oppure il file 
corrispondente non è aperto. 


53 


File not found 
(PC0S/BAS1C) 


Un comando PCOS o BASIC o una istruzio- 
ne OPEN fanno riferimento a un file che 
non esiste sul disco selezionato. 


54 

I 


Bad file mode 
(PC0S/BAS1C) 


In BASIC: si è cercato di usare 
istruzioni PUT, GET su un file sequen- 
ziale, di caricare con LOAD o RUN un 
file dati o di eseguire una OPEN con un 
metodo d'accesso diverso da I, 0, A o 
R. 

In PCOS: può succedere eseguendo un 
programma Assembler. 
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CODICE 


DESCRIZIONE 
(PC05 e/o BASIC) 


COMMENTO 


S 


File already open 
(PCOS/BASIC) 


In BASIC: è stata eseguita una OPEN su 
un file già aperto, oppure è stato 
applicato un comando K1LL su un file 
aperto. 

In PCOS: può succedere eseguendo un 
programma Assembler. 


57 


Disk 1/0 error 
(PCOS/BASIC) 


Si è verificato un errore di 1/0 
durante un'operazione su disco. 


58 


File already exists 
(PCOS/BASIC) 


Si è cercato di assegnare a un file un 
nome identico a uno che esiste già sul 
disco selezionato. 


59 


Disk type mismatch 
(PCOS) 


E' stata fatta un'operazione che ri- 
chiede due dischetti di uguale capacità 
con due dischi di capacità diversa. 


60 


Disk not initialised 
(PCOS) 


E' stato fatto un tentativo di accedere 
a un disco non inizializzato. 


61 


Disk filled 
(PCOS/BASIC) 


Tutto lo spazio disponibile su disco è 
già stato usato. 


62 


End of file 
(PCOS/BASIC) 


Si è verificato un End of File non 
corretto. 


63 


Invai id record number 
(PCOS/BASIC) 


11 numero di record è minore o uguale a 
zero oppure è maggiore di 32768. 


64 


Invai id file name 
(PCOS/BASIC) 


E' stato usato un nome di file non 
valido (con troppi caratteri o con 
caratteri illegali). 


66 


Direct statement in 
file 

(BASIC) 


Durante il caricamento di un file pro- 
gramma è stata incontrata un'istruzione 
immediata (diretta). 

L'operazione di caricamento (tramite 
LOAD o RUN) viene interrotta. 
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CODICI D'ERRORE E SIGNIFICATO 



CODICE 


DESCRIZIONE 
(PCOS e/o BASIC) 


COMMENTO 


67 


Too many files 
(BASIC) 


Si è tentato di creare un nuovo file 
(con il comando SAVE o l'istruzione 
OPEN) quando la directory è già satura 


69 


Volume name not found 
(PCOS/BASIC) 


Il nome del disco specificato non è il 
nome di un disco in linea. 


70 


Renarne error 
(PCOS/BASIC) 


Si è cercato di attribuire un nome non 
valido a un disco durante una operazio- 
ne di renarne. 


71 


Invai id volume number 
(PCOS/BASIC) 


11 numero di drive specificato non è 
ammesso. 


72 


Volume not enabled 
(PCOS/BASIC) 


E" stato fatto un tentativo di accedere 
a un volume non abilitato. 


73 


Invai id password 
(PCOS/BASIC) 


E' stata specificata una password non 
va 1 i da . 


74 


lllegal disk change 
(PCOS/BASIC) 


E' stato cambiato il dischetto dal- 
l'ultima volta che il file è stato 
usato. 


75 


i 

Urite protected file 
(PCOS/BASIC) 


E' stato fatto un tentativo di scrivere 
su un file protetto da scrittura. 


76 


Error in Parameter 
(PCOS/BASIC) 


Uno o più parametri contengono valori 
non ammessi. 


77 


Invai id number of 
pararne te rs 
(PCOS/BASIC) 


Sono stati indicati troppi parametri. 


78 


File not OPEN 
(PCOS/BASIC) 


Si è cercato di leggere o scrivere su 
un file non aperto. 


79 


Printer error 
(PCOS/BASIC) 


Errore di stampante, come per esempio 
mancanza di nastro inchiostrato. 


80 


Copy protected file 
(PCOS) 


E' stato fatto un tentativo di copiare 
un file che è protetto da copia. 
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DESCRIZIONE 
(PCOS e/o BASICI 



COMMENTO 



81 



82 



92 



99 



101 



Paper empty 
(PC0S/BAS1C) 



Printer fault 
(PCOS/BAS1C) 



Command not found 
(PCOS) 



110 



111 



Bad load file 
(PCOS) 



Error in time or date 
(PCOS) 



Cali-user error 
(PCOS) 



Time -o ut 

(PCOS) 



Invai id device 
(PCOS) 



Condizione di fine carta. 



Malfunzionamento della stampante. 



Non è stato trovato il comando specifi- 
cato sui dischi in linea. 



La versione del comando non corrisponde 
alla release di PCOS presente in 
memoria. 

E' stata specificata un'ora o una data 
non corrette. 



Si è verificato un errore sul richiamo 
di un comando PCOS o di una routine 
Assembler. 



Si è verificato un errore di time-out 
(per esempio si è cercato di usare una 
stampante non collegata). 



11 nome del device specificato non 
esiste. 
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D. DIFFERENZE TRA RELEASE DEL PCOS 



SOMMARIO 

Questa appendice indica le differenze tra la release di PCOS 1.3 e la 
release 2.0 e successive. 



INDICE 

DIFFERENZE TRA RELEASE D-1 
UTILITY GETCONV.BAS D-3 



DIFFERENZE TRA RELEASE DEL PCOS 



DIFFERENZE TRA RELEASE 



PCOS RELEASE 1 .3 


PCOS RELEASE 2.x E SUCCESSIVE 


L'hard disk non è supportato. 


L'hard disk è supportato (dalla R. 
2.x). 


1 dischetti da 160 Kbyte e da 
640 Kbyte non sono supportati. 


1 dischetti da 160 Kbyte sono 
supportati dalla R. 2.x e i di- 
schetti da 640 Kbyte dalla R. 3.x. 


Il video a 8 colori non è sup- 
portato. 


11 video a 8 colori è supportato 
dalla R. 2.x. 


1 linguaggi ASSEMBLER e PASCAL 
non sono supportati. 


11 linguaggio ASSEMBLER è supporta- 
to dalla R. 2.x e il linguaggio 
PASCAL dalla R. 3.x. 

J — 


1 seguenti comandi PCOS non sono 
supportati : 

ASM, BVOLUME , CKEY, DC0NF1G, 
LSCREEN, POEBUG, PUNLOAD, RFONT 
SLANG, LINK, WERIFY, «FONT. 


1 seguenti comandi PCOS sono sup- 
portati (dalla R. 2.x) : 

ASM, BVOLUME, CKEY, DC0NF1G, 
LSCREEN, PDEBUG, PUNLOAD, RFONT, 
SLANG, LINK, WERIFY, WFONT. 



Le tastiere Grecia e Iugoslavia 
e la versione Delta non sono 
supportate. 



Inoltre sono state aggiunte le 
seguenti opzioni ai comandi: 

ED1T (opzione "%g" dalla R. 2.x e 
"W dalla R. 3.x) 

FL1ST (opzione "%h" dalla R. 3.x) 

PKEY (opzione "%c" dalla R. 3.x) 

SSYS (opzione "disk time" dalla R. 
3.x) 

Il comando FNEW è stato ampliato 
per consentire di creare una lista 
di file (dalla R. 3.x). 

Le tastiere Grecia e Iugoslavia 
sono supportate dalla R. 2.x e la 
versione Delta dalla R. 3.x. 
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PCOS RELEASE 2.x E SUCCESSIVE 



Il comando BASIC è residente. 



11 comando BASIC è transiente 
(dalla R. 2.x). 



Il PCOS e il BASIC sono caricati 
insieme in memoria in fase di 
inizializzazione. 



Solo il PCOS «iene caricato in 
memoria ali ' inizializzazione (dalla 
R. 2.x). 



Ali 'inizializzazione l'ultimo drive 
selezionato è sempre il drive 0. 



11 prompt del PCOS è 

> 



Il valore di default del parametro 
"memory" nell'istruzione CLEAR è 
38000. 



11 comando LABEL del PCOS non ha 
il parametro "colour". 



1 valori limite del parametro 
"position" nell'istruzione W1ND0W 
(per aprire una finestra), se vie- 
ne fatta una suddivisione orizzon- 
tale, è: 



Ali ' inizializzazione l'ultimo drive 
selezionato è quello dal quale è 
stato caricato il PCOS (dalla R. 
2.x). 



Il prompt del PCOS è n > , dove n 
indica l'ultimo drive selezionato 
(dalla R. 2.x). 

11 valore di default del parametro 
"memory" nell'istruzione CLEAR è 
36800 (dalla R. 2.x) e 36000 (dalla 
R. 3.x). 



Il comando LABEL del PCOS ha il pa- 
rametro opzionale "colour" (dalla 
R. 2.x). 



1 valori limite del parametro 
"position" nell'istruzione W1N00W 
(per aprire una finestra), se viene 
fatta una suddivisione orizzontale, 

è : 



limite inferiore = 

valore che indica lo spazio tra 
due linee contigue di testo + 1 

limite superiore = 

valore che indica l'altezza del- 
la finestra genitrice diminuito 
del limite inferiore + 1 



limite inferiore = 1 



limite superiore = 255 



(a partire dalla R. 2.0). 
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DIFFERENZE TRA RELEASE DEL PCOS 



PCOS RELEASE 1 .3 


PCOS RELEASE 2.x E SUCCESSIVE 


Le stampanti PR 1481, PR 2300, 

rt\ «Ju, rn tu JJ f ri» Jt-V C le ina»-. 

chine per scrivere elettroniche 
ET 121 ed ET 231 non sono suppor- 
tate. 


Le stampanti PR 1481, PR 2300, 
PR 430 e le macchine per scrivere 
elettroniche ET 121 ed ET 231 sono 
supportate dalla R. 2.X. 

Le stampanti PR 2835 e PR 320 sono 
supportate dalla R. 3.x. 


Non è possibile visualizzare i 
primi 32 caratteri della Tabel- 
la ASCII. 


A partire dalla R. 3.x è possibile 
abilitare (parametro +cc ì e disa- 
bilitare (parametro "-ce") la vi- 
sualizzazione dei primi 32 caratte- 
ri della tabella ASCII, in modo 
temporaneo (per l'esecuzione di un 
singolo comando PCOS) o permanente. 


Esistono due liste di messaggi di 
errore, una per il PCOS e una per 
il BASIC. 


La lista dei messaggi d'errore è 
stata unificata con alcune modi- 
fiche, a partire dalla R. 3.x. 


Il numero massimo di parametri in 
un comando PCOS è pari ad 11. 


Il numero massimo di parametri in 
un comando PCOS è pari a 20 dalla 
R. 2.x. 



UTILITY GETCONV.BAS 

Per assicurare la compatibulità tra release 1.x, 2.x e successive del 
PCOS, quando un utente ha memorizzato su file delle immagini video otte- 
nute con le istruzioni BASIC GET/PUT della grafica è necessario converti- 
re questi file (sequenziali o random) con l'utility getconv.bas. 

Per convertire un file l'utente deve seguire la seguente procedura. 
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5TEP 


AZIONE 


1 


Caricare in memoria il PCOS 2.x 


2 


Entrare in BASIC impostando: ba tAM 

Lanciare l'utility impostando: RUN "getconv.bas" Iti 

Nota: è anche possibile impostare direttamente da PCOS ge m 


3 


Impostare l'identificatore del file da convertire quando appare 
su video il messaggio di richiesta. 


4 


Impostare l'identificatore del file di output, quando appare su 
video il messaggio di richiesta. 


5 


Impostare "s" se il file da convertire è sequenziale ed "r" se è 
random. 


6 


Verificare quanto appare sul video, in particolare la dimensione 
della matrice unidimensionale a elementi interi che è stata 
memorizzata su file. Se la dimensione risulta superiore a quella 
indicata nel programma BASIC sarà necessario variare anche 
l'istruzione OIM nel programma. 


7 


Aspettare che la conversione sia finita, cioè che appaia il 
prompt del BASIC (Ok). 
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E. ISTRUZIONI, COMANDI E FUNZIONI BASIC 



SOMMARIO 



Questa appendice riporta, in ordine alfabetico, le istruzioni, i comandi 
e le funzioni BASIC, indicando la pagina (o le pagine) del manuale dove 
l'argomento viene illustrato in dettaglio. 

Se una istruzione, una funzione o un comando può essere usato sia in una 
linea di programmazione sia in una linea ad esecuzione immediata, viene 
specificato PROGRAMMA/IMMEDIATO; se può essere usato solo in una linea ad 
esecuzione immediata, viene specificato IMMEDIATO; se può essere usato 
solo in una linea di programma, viene specificato PROGRAMMA. 

^> 

INDICE 

ISTRUZIONI, COMANDI E FUN- E-1 
Z10NI BASIC 
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ISTRUZIONI , COMANDI E FUNZIONI BASIC 



AB 5 

ASC 

ATN 

AUTO 

CALL 

CDBL 

CHAIN 

CHR$ 

C1NT 

C1RCLE 

CLEAR 

CLOSE 

CLOSE UINDOU 

CL5 

COLOR 

Per selezionare i 
colori di foreground 
e background 

COLOR 

Per selezionare i 
colori contempora- 
nei 

COMMON 

CONT 

COS 

CSNG 

CURSOR 



(PROGRAMMA/ IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/ IMMEDIATO) 

(IMMEDIATO) 

(PROGRAMMA/ IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/ IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA) 

(IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 



9-6 
9-20 

9- 6 
2-6 

10- 10 
9-7 

11- 3 
9-20 
9-8 
14-39 
5-1 

12- 7 
14-13 
14-20 
14-18 

14-17 

11-7 

13- 5 
9-8 
9-9 

14- 31 
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CVD 

CV1 

CVS 
DATA 

DATES/T1MES 

DEFDBL 

DEF FN 

DEF1NT 

DEFSNG 

DEFSTR 

DELETE 

D1M 

DRAW 

ED1T 

END 

EOF 

ERASE 

ERL 

ERR 

ERROR 
EXEC 
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(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/ IMMEDIATO) 

(PROGRAMMA) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/ IMMEDIATO) 

(IMMEDIATO) 

(PROGRAMMA) 

(PROGRAMMA) 

(PROGRAMMA/ IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 
(PROGRAMMA/IMMEDIATO) 



( 9-39 
I 12-43 

I 9-3' 
112- 

( 9-3 
\ 12- 



-39 
43 



-39 
43 

5-6 

9-38 

4-10 

9-3 

4-10 

4-10 

4-10 

3- 2 

4- 19 
14-42 
3-8 
13-4 



I 9-4 
1 12- 



-40 
27 



4-23 

I 9-40 
\ 13-12 

I 9-40 
1 13-12 

13-8 

10-12 
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- MANUALE GENERALE 



ISTRUZIONI , COMANDI E FUNZIONI BASIC 



E XP 

FIELD 

FILE5 

F1X 

FOR 

FRE 

GET-Grafica 

GET-File 

GOSUB 

GOTO 

HEXS 

IF... GOTO... ELSE 

1F...THEN...ELSE 

1NKEYS 

INPUT 

INPUT # 

INPUT S 

1NSTR 

INT 

K1LL 

LEFTS 

LEN 

LET 

LINE 
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(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/ IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA) 

( PROGRAMMA/ 1MMED IATO ) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/ IMMEDIATO) 

( PROGRAMMA/ IMMEO 1 AT 0 ) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 



9-10 
12-29 
3-20 
9-10 

8- 12 

9- 11 
14-52 
12-42 

10- 3 

8- 1 

9- 21 
8-4 

8- 4 

9- 22 
5-10 
12-22 
9-23 
9-24 
9-12 
3-16 
9-26 
9-27 
5-3 
14-36 
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LINE INPUT 
LINE INPUT» 
LIST 
LL15T 
LOAD 

LOC 

LOG 

LPOS 

LPR1NT 

LPR1NT USING 

LSET 

MERGE 

M1DS - Funzione 

M1DS - Istruzione 
MKDS 

MKI$ 

MKSS 

NAME 
NEW 
NEXT 
NULL 



(PROGRAMMA) 
(PROGRAMMA/ IMMEDIATO) 
(IMMEDIATO) 
(IMMEDIATO) 
(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 
(PROGRAMMA/IMMEDIATO) 
( PROGRAMMA/IMMEDIATO ) 
(PROGRAMMA/IMMEDIATO) 
(PROGRAMMA/IMMEDIATO) 
(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 
(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/ IMMEDIATO) 

(PROGRAMMA/ IMMEDIATO) 
(PROGRAMMA/ IMMEDIATO) 
(PROGRAMMA/ IMMEDIATO) 
(PROGRAMMA/IMMEDIATO) 



5-14 
12-25 
2-10 
2-10 

2- 27 

9-40 

12-19 

12-39 

9-13 

9-40 

7-4 

7-12 

12-33 

3- 18 

9-28 
12-36 

9-29 

9-41 

9-41 
12-36 



( 9-41 
\ 12-31 



36 
3-15 
2-8 
8-12 
7-1 
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ISTRUZIONI, COMANDI E FUNZIONI BASIC 



OCT$ 

ON ERROR GOTO 
ON...GOSUB 
ON... GOTO 
OPEN 

OPTION BASE 
PAINT 
POINT 
POS 

PRESET 
PR1NT 
PR1NT II 
PRINT USING 
PR1NT# USING 
PSET 

PUT-Grafica 
PUT-File 
RANDOMIZE 
READ 

REM/CAMPI COMMENTI 

RENUM 

RESTORE 

RESUMÉ 



(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA) 

(PROGRAMMA) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/ IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/ IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA) 

(PROGRAMMA) 

(IMMEDIATO) 

(PROGRAMMA) 

(PROGRAMMA) 



9- 31 

13- 10 

10- 7 

8- 3 
12-4 

4- 24 

14- 48 
14-29 
14-34 
14-28 
7-4 
12-11 
7-12 
12-16 
14-27 
14-54 

12- 37 

9- 15 

5- 6 

2- 3 

3- 6 
5-6 

13- 14 
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RETURN 

RIGHT$ 

RND 

RSET 

RUN 

SAVE 

SCALE 

SCALEX 

SCALEY 

5GN 

SIN 

SPACES 

SPC 

SQR 

STOP 

STR1NGS 

STRS 

SUAP 

SYSTEM 

TAB 

TAN 

TRON/TROFF 
VAL 



(PROGRAMMA) 

(PROGRAMMA/ IMMEDIATO) 

( PROGRAMMA/ 1MMED 1 ATO ) 

(PROGRAMMA/ IMMEDIATO) 

(PROGRAMMA /IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/ IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/ IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/ IMMEDIATO) 

(PROGRAMMA /IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/ IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 



I 10- 
\ 10- 



9-32 
9-14 

12- 33 
2-30 
2-23 
14-22 
14-25 
14-26 
9-16 
9-17 
9-33 
9-41 
9-18 

13- 4 
9-35 

9- 34 
5-5 

10- 14 
9-43 
9-18 
13-2 
9-36 
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ISTRUZIONI , COMANDI E FUNZIONI BASIC 



VARPTR 

UEND 

UH1LE 

UIDTH 

UINDOW 

Per aprire una 
finestra 

UINDOW 

Per variare lo spa- 
zio tra linee e ca- 
ratteri 

UINDOW 

Per selezionare 
una finestra 

URITE 

URITE # 



(PROGRAMMA/ IMMEDIATO) 
(PROGRAMMA/ IMMEDIATO) 
(PROGRAMMA/ IMMEDIATO) 
(PROGRAMMA/IMMEDIATO) 
(PROGRAMMA/ IMMEDIATO) 

(PROGRAMMA/IMMEDIATO) 

(PROGRAMMA/ IMMEDIATO) 

(PROGRAMMA/ IMMEDIATO) 
(PROGRAMMA/IMMEDIATO) 



9-44 

8-21 

8-21 

7-2 

14-4 

14-7 

14-11 

7-10 
12-17 
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A VVISO 

La Ing. C. Olivetti & C. S.p.A. si riserva il diritto di apportare mo- 
difiche al prodotto descritto in questo manuale in qualsiasi momento e 
senza preavviso. 

Questo materiale è stato preparato da Olivetti esclusivamente per l'uso 
da parte dei propri clienti. 

Olivetti garantisce che il presente materiale costituisce, alla data di 
edizione, la più aggiornata documentazione da essa elaborata relativa al 
prodotto cui si riferisce. 

E' inteso che l'uso di detto materiale avviene da parte dell'utente sotto 
la propria responsabilità. 

Nessuna ulteriore garanzia viene pertanto prestata da Olivetti (in par- 
ticolare per eventuali imperfezioni, incompletezze e/o difficoltà opera- 
tive), restando espressamente esclusa ogni sua responsabilità per danni 
diretti o indiretti comunque derivanti dall'uso di tale documentazione. 

Tutta la documentazione è coperta da copyright. 
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